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FROM THE EDITOR 

The fourth newsletter is long overdue, the third being published in 
February 1975. There have been many significant events that need 
announcing. The highlights are: 

Release 2 of PASCAL 6000^-3.4 has been made available by 
Dr. Urs Ammann at Eidgenossische Technische Hochschule in 
Zurich, Switzerland. It is also available from Mr. George 
Richmond at the University of Colorado Computing Center in 
Boulder, Colorado and Mr. Carroll Morgan at the Basser 
Department of Computer Science, University of Sydney, 
Australia. Many improvements have been made over Release 1 
and future developments are promised. See page 73. 

Mr. Carroll Morgan of the Basser Department of Computer 
Science at the University of Sydney, Australia has kindly 
agreed to distribute ETH Pascal and portable Pascal for . 
Australia and neighboring regions. Interested parties should 
contact Mr. Morgan for more information. 

Mr. Andy Mickel of the University of Minnesota kindly agreed 
to take over editorial control and publication of the Pascal 
Newsletter commencing with issue Number 5 in September 1976. 
He is also organizing a User's Group. See pages 88 and 89. 

An improved portable Pascal has been released from ETH, 
, Zurich. See page 81. 

News of Pascal compilers for numerous machines has been 
received. See pages 96 and following. 

An expanded bibliography of Pascal literature has . been 
compiled. See pages 100 and following. 

I have enjoyed producing the first four newsletters but I have found 
it to be very time consuming. I am grateful to Andy for taking over 
these duties with enthusiasm. I will continue to distribute Pascal in 
North America thru the University of Colorado. 



George Richmond 



fi+tus 217 ^ p.opAi 

CouimeiU on an exte nsion ut PASCAL. 

in a recent PASCAL-news let ter ( #3) we find a proposal by N. Wirth 
regarding "A generalization of the READ and WRITE, procedures''/ 
TUe proposal, which has been implemented in the PASCAL 6000-3. A 
compiler^ considers the procedure 

read(f,x> to be synonymous to the sequence; 
X ft ; get(ff) , and 
write (f.x) to be synonynvous to the sequence 
ft X ; put(f) 

It is my opinion that standard procedures should only be introduced 
when 

.) their body cannot be described in the language PASCAL, or when 
b) there exists an essentially faster mapping of the body directly 

onto the oachine-code (e.g. one instruction that does the job), 

than the compiled code of the PASCAL-body admits. 

Standard procedures of type a) should be a standard for the languages 
as such. ' 

standard procedures of type b) should be standard for a particular 
configuration only, in order to give the programmer a convenient form 
of access to particular aspects of the machine at hand. 
When transferring a program based on type b) standard procedures to 
another machine, the portability is ensured by supplying the appropriate 
procedure-declarations . 

Procedures that do not satisfy any of the above criteria may nevertheless 
be placed for convenience in a library of (basically) source-code 
procedures. 

In line with the above philosophy we have decided not to implement the 
arithmetic functions like sin. atan. In etc.. in our PASCAL-version for 
the PDP/11 series. Apart from the relief for the builder of the system 
who has to implement these routines in machine code, one may well suppose 
that an abundance of standard procedures can be disadvantageous to the 
compactness of both compiler and runtime system. 

NOW let us take a look at the file-proposal with the above in mind. Then 
the proposal only s.tisfie. criterion (a). This criterion is satisfied 



since if the procedures were to be described in PASCAL the typt of th*j 
parameters f and x had to be fixed. 

It would, however, be a very minor job to declare the procedures "read" 
and "write" to be specific for a particular type of parameter. The 
bodies would all be equal, only the parameter specification having to 
be adapted. This seems hardly a problem since the number of different 
file types that are dealt with in one program will be quite limited. 
My suggestion is that - if the proposed standard procedures are not 
available - one simply declares: 

readplop (f s file of plop / x ; plop) ; 
begin x s= ft ; get(f) and 

and 

writeplop (f : file of plop ; x : plop); 
begin ft :« x ; put(f) end 

There is, however, a much more Important aspect of the current procedures 
"read" and "write" that asks for a generalization. 

Whereas the files they implicitly operate on (input and output) are 
** file of char" , the actual parameters, may be of arithmetical type and 
a conversion from or to character sequence is specified by the somewhat 
extraordinary remaining parameters (in the case of write) . 
It seems to me that there is a greater need to generalize the procedures 
"read" and "write" in this respect, viz. making the conversion available 
for all files of char. One may now visualise how a PA6CAL program may 
build two output streams in parallel, a feature even the compiler could 
use. 

Alternatively, the conversion routines themselves . could be made available, 
but because of rigid data-sizes in PASCAL there- is no way of properly 
dealing with the format specifications. This appears one of the major 
arguments for considering "read" and "write" as standard procedures. 

One might counter my arguments by stating that it is possible to describe 
"arithmetic quantity character sequence" conversion wholly in PASCAL 
but apart from the above arguments .concerning the need for flexible 
data-formats, it is impossible to describe the conversion from a real 



quantity to a character sequence in terms of real operations because 
ot the implicit inexactness of real arithmetic. In that case at least 
J standard procedure has to be supplied for tlit; conversion of a real 
quantity to (a number of) integer quantities, in other words: if one 
has a real quantity x, for which . 1 ^ x < i , it is not 
guaranteed that I S x ♦ 10 < 10 , and therefore trunc (10 * x) may not 
deliver the correct digit! This example shows, by the way, that 
"trunc" is a very illdefined function, which should be abolished from 
programming languages I 



C. Bron. 

Enschede 25.5.1975. 



c.c. Wirth. 

Richmond. 
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DEAR MR. RICHKONO, 

I THANK POR YCUR LETTER FfiOIA THE 16-hAY-75. THE P/»SCAL 
COMPILER 6A5ED ON JANU5 HaS BEEN ItiPLEMBNTED ON THE FDF-ll/^S 
RUNNING. UNDER THE CCS/BATCH CFERMING SYGTEh' MO A F R EL IP I-'N A R V 
VTm^IIGN HA5 i:rr> REL^i/iSci: TC A LIMTEO NL^'BER CP SITES, 

THE AVAlLAHLE P ASCi^L-CCNF ILER (P.^S?^! IS WRITTEN IK TFE 

LA^tUAC^E IT TRANSLATES, ITS JCB IS TC AKHYSE A PASCHAL PRCGRAh 

FCR SYNTACTIC EKKCKS /iKC TC GENERATE CCLE FCR A .STANDARD AESTRACT 
HaCHINE called JANUS lCCL73r. 

THE r^ACRCGENERATCR STACEa (1^AI73, HEI7fl3 f APS THIS 
SYf'eOLIC JA^JLS CCCfc IMC THE Pi:P-n ^SSEWELER CODE, fACRC-11, Tj- E 
v)/>^Uo/HACKO-.i 1 TRANoLATCR IS HEpINEC BY .SET -CP ST A GE2-^' ACRCS . AS 
THE PROfjllCEO CCDE IS CRG4MZED ARCLNC AN ICEaLI2EC ABSTRACT 
MACHINE THERE IS LBFT CCKSIDEHABLE RCCK FCR CPTIM7ATICN. CCCE 
/^Nj) DATA ARE SPLIT INTC c SEFERATE FILES, 

THE PINAL TRAKSL^TICN TO ABS'CLLTE CCCE IS PRCVIDEC BY THE 
NCRj-'AL P':P-11 ASSEf'BLiiR ^NO LINKER, THE PASCAL LCACER LCACS ThE 
DArAFXLi: IMC The LSC(^-DATa-SPACE (32 K ih'AXIfLK) AND THE DCCEPILE 
INTC the: USER-.INSTRUCTICN-SFACE (22 K KAXIKUf), 

fHE pASCAL-COf^PILER REtJUIRES TC OCPPILE ITSELF (PASCAL/ 
JAMS) o/| K ^CRUS CP ('EHCHY AnC ^e/l SEC. THE TRANSLATION AND 
EXiiCUTXOiS HHP CP PASCAL AND FCRTRAN t^ERE CCHPAREC: THE l^HCLE 
TfiANSLAlION PHCCESS IS ABCLT THE FACTOR 1,2<3 THAT CP EQUIVALENT 
^C.'MRAN f'POGRAhS CN THE PUP-Ui KHEREAS ThE EXECUTION SPEEC IS 
A0f:UT THE FACTOH 2,65. 

ALL FFATU»t-ES CP THE USED PASCAL L^NGLAGE (CLASS ANC -ALFA 
^Ani.mj\tif ^/ALLE ANC FILE DECLARAT ICNS , .GLOBAL EXITS, ..•) ARE 
iHPLEHEiNTLD .EXCEPT FOR PARAMETRIC PRCCEDLRES. THE TLCATING PCINT 
PRCC'iSSfJR iS LSEC POR REAL ARITHHETIC ANC FCR TEXT-HANDLING 
CALFA TYHK), THE I/O CONCEPT INCLLCES CONCURRENCY AND EXFLIZIT 
CUTPUT CjJNTRCL (GRAPHIC OUTPUT POSSIBLE TCC), 

THE PASCAL-n USEH'S GLICE PRCVICES I NFCRH AT ION iNECESS AR Y 
TO INSTALL THE PASCAL^ll SYSTEH AND TC TRANSLATE AND EXECUTE 
PASCAL HRflGRAVS CN THE PCP-ll/^S. 
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',df-- F-ASCa-CCrPILeR can P.E fCVtC K ANCThER CCHPLTER 
viry- l V^n^n a«^CI,nT CF hFPCRT: IhE JAMS TRANSLATCRj \^H1CH 
TH.AK.Sl ATP:J5 THFI HAC</tNK J. K C R P E N H A K T JAMS CCCE IMC THE ASSEf^ELV 
CZCt FC^ ThH TAHUtT FAChlNfc. HAS TC EE ftEVsRlTTfN, I,E. ANClFeF 
5ff 1]^' MAC«rs FCfi TV-F NHU MACHINE HAS 7C BE CEPrKEC, THE NECES 
PCCUHENi ATION X5 *VAlUAt3Lfe FRCf |^EE73), 

THu F ^SCAt-CC.^FIl hP (WRITTEN IN PASCAL ANC JANUS5, THE 
vTAGr.^ HmCJ^OGFKF.KATCR (CCS ANC RS^t-U VERSICN) tHS17^3 ANC THE 
Fi3CAL-Jt i.'.SlH'g GLI'J^ (J-feHSl (.U PAGES) A3. WELL THE >HCLe 
jYSTEI' AUt AVAILABLE. 



Cri.73" CM.Lf AN,S,2,, PCCLE,F.C, , MITE,l\al^, 

TmiI PCHRt PfxCGRAr^i'ING .S*tJ:TEfS JAMS 
•uraVKf^SI f V CF CCuURAUC. ^JCLLCER, 197.2 
iiCFTUAPt FHACTICI: ANC EXPERIENCE 

y^A15 rrir f^'r3I.'iFN .L, 

HAaCAL-^U USURY'S GUlCE 
IjKlVCRSITAET KARLSRLHE fM'^'f^ 

\'fni\ HrT.M(lCH,P.H. 

STaGEc. PCR THE PCP^ll 'CECUS 197-4 

FAS7^ PASCAL CCHPILER 

AMHAN,U, , SCHILC.R, HE ; 33/ 1 1 /7«i- 

FACHGnUPPE CCNFUTERysISSENSCHAPTEiN 
finG, TFCHMSCHE HCCHSCHLLE 
CH-.6CC.6, ZLERICH . 

REVISION TR PRCDICE JANUS 
LARRY B, UfRRR 

lifavcrxsn Y cf cglqhaoc .SPRING i'<3T3 

REVISED eY LLCIEN FEIEREISEN 

l•^av^.^sItY cf karlsplhe fhl is7^ 

^''^^"^ IhPUrfcNTXKG SCPTWAHE PGR NCN-^NUfERIC APPLKATIONa 
PeNTicE-»'ALL IK,. ENGLEWCCQ CLIFFS, .N.J, (1973) 

VEH73 i.f:QFr:,L.^, 

A r'ASCHINE INCEPENCANT PASCAL COMPILER 
hS-THcSiS, UMVERSITY CF CCLCRADC, BCULSER, 1973 
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UNIVERSITAT HAMBURG 

INSTITUT FUR 
INFORMATIK 

Prof. Dr, H.-H. Nagel 

' . InetJhrt for lbform«tlk 

a Hamburf U, ScfalOtewnfl* €6-73 



jtay 1st, 1975 I 

Dear Mr. Richmond, 

The enclosed summary informs you about our PASCAL-compilers avail- 
able for the DECSystem~10 . In case you enquired recently about our | 
compiler and did not yet receive an answer, please excuse me. I 
have been busy (amongst other tasks) to prepare this version for 
distribution. , i 

CZI You are on a distribution chain for three DECtapes and schedul- j 
ed to receive them from • 

d] Please check here if you are interested to obtain our PASCAL ; 
compiler. ! 

"i Shipment requires (please check) 

en 1 Dectape for the PASCAL-compiler generating directly executable,*'" 
sharable object code 

( ^ 2. Dectapes for the PASREL-compiler generating LINK-10 compatible 
relocatable object code, the PASCAL source level de-- 
bugging system (PASDDT), the crossref erencing program 
CROSS and the PASCAL-Help' file (the latter one in 
German since I did not want to delay shipment* any 
further by the time required to translate this file 
into English ) . 

nzi 1 small MAGtape if you don't have Dectape drives at* your instal- 
lation. Since MAGtapes require more trouble at our site, DEC- 
tapes are preferred. 

Please do not send tapes jj'^^ you are located in continental US 

or Canada sinc^ I intend to reier your name to someone m your j 

vicinity who has received these versions, 

d Would you see a possibility to provide a copy of these files to 
aomeone else if asked to do so? 

you are interested, please return this -questionaire to 
.:.H,-Hf Nagel, Institut fUr Informatik 
* • SQhiUterstra^ie 7Q^ D-2000 Hamburg 13 

Yours sincerely 



The PASCAL ir.ipleirentation for the- DECSysbem-10 hao been considerably 
improved and enlarf3cd. It nov; supports all phases in the. generation, 
debucginc and maintenance of PASCAL programs. 

1, The editin.r phase by the formatting features of CROSS. 
2* The cor.pilation phase by offering: 

2.1 a compiler • nar.ed PASREL generating relocatable object code 
compatiblo with LIIIK-lO. Output from this compiler will 
autonatically direct the loader to search the FORTRAN-library 

' for standard functions Sill, COS etc. if necessary. External 

procedures (e.g. v/ritten in MACRO-IO or separately compiled 

PASCAL procedures) can be linked on. A source level debug 
option is available (see p. IV) » 

2.2 a more conpact, faster compiler named PASCAL generating 
directly executable, sharable object code. Use of this com- 
piler is recommended, if 

no external procedures 
no debug option 

no standard functions from the FORTRAN library 
are required, 

3. The dcburrinr: phase i breakpoints can be set at runtime based on 

source prorran line numbers. After a program stops at such a break- 
point, variable locations can be inspected and modified using the 
source program identifiers (see p. IV).. 
The maintenance phase: the program CROSS generates 

- an mcencated source program listing v/ith extension vCRL 

- markers in the left margin for each start and termination of . 
nested statements 

- a crossreference list of all source program identifiers 

- a survey of the static procedure nesting 

- for each procedure a list of v/hich procedures it activates and • 
by which procedures it is activated 

- an indentated source program file with extension *NEV/ 

The following section sunr.arizes new features available in both 
compilers (see the PASCAL. IILP file distributed with PASREL for 
furt.her information)! y 

5.1 READLN {(^file identifier >)/ skips over the rest of the current 
line until the next end-of-line is detected. It accepts further.- 
argurr.entSr . • . 

5.2 PAGE -((<filo identifier>)} appends a <carriage returnxform feed>> 
to the FILE OF CHAR denoted by <ffile identifier> . If none is 
given OUTPUT is assumed* <formfeed> advances to the beginning 

of the next page. 

5.3 The procedures PACK and UNPACK have been implemented with an 
optional fourth argument. These procedures are much 
r.ore effective in packing or unpacking larger arrays than a FOR- " 
loop using indexed access to components of such an array. 

5.^ The sequences (♦«• and ■«) are recognized as opening and closing 

comment brackets in addition to % and \ . 
5.5 CROSS and both compilers accept the general file specification ' 

allowed by the TOPS-10 monitor'. 
5«6 A constant subrange may be given in sets> i e.gi 

C'A» .. 'C'J instead of ['A', 'B', 'cO. 

5.7 An OTHERS branch niay be specified in CASE-statements, ' 

5.8 Compiler options (see also 5-1^)1 

5»8«1 JJ^C"f\ generates instructions for runtime checks 
at array indices and assignment to scalar 
and subrange variables. . 
X^C-\ suppresses code generation for runtino checks 
Default: C'f 

7 
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5.8.2 jC$L+\ appends the symbolic version of the object 

code generated to the source program listing 
for each procedure and adds the starting ad- 
dress of the object code for each source pro- 
'gram lino 

, A'tL-X no symbolic object code listing 
Default: L- 

. Sinco runtime errors still give only the object code address be- 
sides the message identifying the error, compile the program 
with the compiler option L+ in addition to C+ in order to learn 
from this listing, to which source program line the error ad- 
dress belonr;s. 

5.9 The following standard functions are" available to both compilers 

function of result type yielding 

TiTiE * INTEGER time m milliseconda 

RUNTIME INTEGER CPU-time in milli- 

seconds 

5.10 For initialisation of global variables at compile time use 
INITPROCEDURE . 

5.11 The LOOP statement is available- 

5.12 The standard procedures RESET /REWRITE can be used with up to 
four optional arguments allowing full file specifications at 
runtime 

5.13 Pascal programs to be compiled by PASREL may use the follow- 
ing additional standard functions (all functions and airgumente 
are of type REAL) 'from the FORLIB on fKe logical device SYSj 

SIN COS ARCTAN EXP SQRT RAimOM 

SIND COSD TANH LN 
ARCSIN ARCCOS LOG 
SIKH ■ COSK 

function of result type . yielding 

DATE PACKED ARRAi'Ll^.S) OP- CHAR WTH^YY^ 

with D=day, 

r -1. . , Msmonth, y=year 

5.1^ Following the head of a procedure/function declaration by 
EXTERN Slanguage symbol> j 
_ will direct the compiler to provide for linkage to an external 
procedure/function. 

<language symbolV: :=empty] FORTRAN I ALGOL I COBOL. 
•The language symbol determines the conventions for parameter 
passing to an external procedure/function. If none is provided, 
■ PASCAL 15 assumed. If any of the three nonempty language sym- 
bols is indicated, the loader is directed to search the cor- 
responding library on logical device SYS. 

If a group of pascal' procedures without a main program has to be 
compiled separately, use JSM-\ at the beginning of the correspond- 
ing PASCAL source file. In this case the outermost procedure/func- 
tion names will automatically be declared as ENTRY by the com- 
•piler. Include their .REL files when loading I 



5*15 BREAK {(<file identifier>){ forces the current buffer contents 
to be output to the file specified by 4file identifier>. If none 

Is specified, TTY is assumed. This feature is useful, too, for 
intercomputer-conmunication at the PASCAL level. 



Ill 



To use the croasreference 

.RUN CROSS 

FILE: < filename > 



To use PASCAL: 

.RUN PASCAL 

M<rilename> 

{NO] ERROR DETECTED 

"EXIT 

,RUN tfilenaiao 



To use PASREL: 

.RUM PASREL 



listing program 

after FILE: < -* is typed by CROSS give 
source filename in the format 
DEVICE: FILNAM.EXT /7project# , progt'.^J 
everything except PILMAM may be omitted 



source filename specification (see CROSS) 
If an error has been detected, object 
code is not available for execution I 

The core requirement indicated by " 
must be estimated from the length of 
LOW and SIIR file plus space for stack " 
and heap. Since error mes.3ages will 
appear if core space is insufficient,* 
trial is often the quickest approach. 



^ <filename> 

{m} ERROR DETECTED 

HIGHSEG : M K 



LOV/SEG 



N K 



RUMTIHE ; T 
EXIT 

.LOAD <filename>. 
LINK: LOADING 
EXIT 

.SAVE <filenajae>W 



JOB SAVED" 

• RUN <filenam^ 



source file specification (see CROSS) 
(see PASCAL) 

M indicates size of high segment (code) 
in Kwords 

U indicates size of low segment (data) • 
in Kwords 

T indicates CPU-time used for compilation 
loading the program 



The total core requirement W must be 
given. W^M + N + 4 Kwords 
If no debug option has been specified in' ' 
the source program, the save-file can be • 
made sharable by using the monitor com- 
mand SSAVE <filename> W. 



execute the program 



Instructions to generate ^ .new compiler version can be fo^nd * 
at the beginning of each PASCAL-compiler source version. 

Note: 

Not yet implemented: 

- formal procedur^"/function arguments 

. - branch out of a procedure/function (label declaration ia*not 
• ' yet required) 
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IV 



6. 



6.2 



5. if 



$ 

6.5 J STOP <LINE> 



6.6 i 

6.7 I 

6.8 ^ <VARIABLE> » 



STOP NOT <LINEV 
STOP LIST 



DEBUG option 

6,1 Indicate dcbup option in (part of the) source pronram text? 
^J.'I.dA* If no dcbuGging is required in later parts, fol- 
low the section to be debugged by /i$D-\ since this will 
save core and runtime in those sections not to be debugged. 
Use PASREL etc. (see above) to generate an executable SAV 
file , giving W N + 8 to allow working space for the 

debug code. e. 
6.3 Get the listing of the compiled program in order to know 
exactly where to set breakpoints by 

PRINT <filename>.LST 
.RUN <filename> begin execution of this program 

^ answer with <carriage returns 

STOP AT MAIN BEGIN 

enter breakpoints using the followr 

ing commands 

set a stop at the begin of the source 
line indicated by line number <'LI1IE> 
<LIlvE> : := <'LINE]IUM3ER> I 

< LIKEIJUI-'.BER> /<PAGENUMflEJ^ 

< LINEMUM3ER> : : = < U,\'SIGI;ed IIITEGSRV 

< PAGEi;UMBER> ; : = < UNSIGNED INT£GSR> 
If no pagenumber is given, 1 is as- 
sumed . 

delete breakpoint at line ^LINE^ 
list all current breakpoints on the 
terminal 

give the current contents of the lo- . 
cation indicated by the source iden- 
tifier (possibly expanded by quali- 
fiers); the scope rules applying to 
the source state.Tent eorre spending 
to the current breakpoint uniquely 
determine the variable location froia 
the ■ identifier given. All qualifiers 
legal in Pascal may be used (i.e. 
pointers, record fields, array con- 
. ponents) 
9 f <VARIABLE>:«<VARIABLE OR COKS?ANT> 

The variable or constant value on 
• ' the right hand is assigned as current 
. * ' * value to the variable indicated in 
the left side 

Backtrace of procedure nesting from 
Breakpoint to main; exposes activat- 
ing procedures with linenun-.ber/ 
pagenumber of activation points 
leave debug mode and continue execu-* 
tion. If any breakpoint is reached, 
the message ' 
appears on the terminal 
If the program has been compiled 
v/ith the debug option, it's execution 
can be interrupted by two successive 
control C; 

'typing DDT will then transfer con- 
trol to the debugging mod& 
^ STOP BETWEEN <LINE1> AND <LINE2> v^ill appear on the 

terminal to indicate where the pro- 
■ • -gram has been interrupted. Use of 
commands desci'ibed in 6.5 through - 
. 6.11 is how possible. 

10 



6.10 ^ TRACE 



6.11 ^ END 

y ? 

6.12 # STOP AT <LINS> 

6.13 asynchronous stop 



to to 

.DDT 



iNSTfTUT National Polytechnioue 
DE Lorraine 

D^PARTEMENT INFORMATIOUE 



Monsieur Alain TISSERANT 

Ecole des Mines 
Departement Inf orma tique 
Pare de Saurupt 

540A2 NANCY CEDEX 

France 



Nancy, le 4 Juillet 1975 



Mr George H. RICHMOND 
Pascal Newsletter Editor 
University of Colorado 
Computing Center 

3645 Marine Street department of computer science 

BOULDER, Colorado 80302 v^BF/CMcL 

U.S.A. 




THE UNIVERSITY OF MANITOBA 



WINNIPEG, CANADA R3T 2N2 

15th July, 1975. 



pear Sir, 

A Pascal compiler for Telemecanique T1600 and Solar 
minicomputers is under development; a first yersion will be 
available in September 1976. These computers have a 16 bits 
words size, and no virtual memory facility. Our compiler will 
run with 24K words. 

We are implementing a segmentation mechanism, reflec- 
ting both Pascal programs structure and the Solar computer archi- 
tecture. At each procedure call, a new "segment" will be created 
for code and local data. A specialised monitor manages core memo- 
ry, and swap operations. 

The Pascal-P compiler is being modified (without change 
in the language accepted), in order to get code adapted to our 
data structures representation and our particular procedure lin- 
kage method. 

We are using an existing Pascal compiler (on the CII 
Iris 80) for first binary code generation of the Solar compiler. 

All these mechanisms are fully transparent to the user- 
By careful use of the particularities of special instructions and 
the architecture of the computer, we hope to get a high speed, easy 
to use Pascal system. 

Sincerely, 



George H. Richmond, 
Computing Center, 
University of Colorado, 
3645 Marine Street, 
BOULDER, 

Colorado 80302, 
U.S.A. 



Dear Mr. Richmond, m. ' 

The enclosed is being sent to all the people who have written to 
us requesting information about our PASCAL implementation. 

I realize that up until now, very little information about the 
project has been released. 1 think that this description gives a fair 
representation of our compiler as it currently exists. 

The compiler was written as my Ph.D. project under the supervision 
of Professor James M. Wells. Professor Wells is currently on sabbatical 
leave in Ottawa. For this reason, I would appreciate it if you would 
include my name on your PASCAL Newsletter distribution list. 

I am very interested in descriptions of other PASCAL Compilers and 
Interpreters for IBM machines. If you have any information on core requirements, 
compile speeds, and whether or not the full language is supported, for the 
Grenoble, Stanford or Cambridge projects, I would appreciate hearing from 
you. 

Yours sincerely. 



A. TISSERANT 



Bruce Foiilkes 



THE UNIVERSITY OF MANITOBA 



DEPARTMENT OF COMPUTER SCIENCE WINNIPEG. CANADA R3T 2Na 

WBF/CMcL Jiily, 1975. 



Dear Sir or Madam, 

We are announcing the availability of a PASCAL compiler for IBM 360/370 
computers, developed by the Department of Computer Science at the University 
of Manitoba. The compiler was written by Mr. \1, Bruce Foulkes under the 
supervision of Professor James M. Wells. 

The compiler is one-pass and uses a top-down parsing strategy. 
A generated assembler parser is produced by the translator writing system 
s SYNTICS, All semantic routines are written in PL360, while system interfaces 
are written in assembler. 

The compiler is not a re-write, modification, or bootstrap of any 
' previous PASCAL compiler. The compiler uses some routines provided by the 
SYITTICS system and borrows some ideas and code from the ALGOLW compiler for 
code generation, built-in functions, and I/O. 

This version of the compiler requires approximately 170I\. bytes. This 
size is variable, but the minimum size for compiling a meaningful program 
is approximately 150K. 

Compile speed for test programs has been in the range 125-'200 lines per 
second on an IBM 370/158. This excludes the set-up time of approxinatoly 
0.4 sec. 

A great deal of compile-time checking is done and approximately 130 
different error and warning messages are provided. 

The production of run-time checking code for array subscripts, subrange 
assignments, values returned by PRED and SUCC, etc., can be turned on or off 
at will. Run-time interrupts are trapped with a SPIE macro. There are about 
40 run-time error diagnostics in total. Bach error diagnostic consists of 
an error message, location in the current segment, the invalid value if 
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appropriate, and a traceback of all segments invoked. 



Linkage, although not completely standard between PASCAL segments 
appears to be standard IBM to any external segments, allowing linkare to 
routines written in other languages. 

The compiler supports a subset of the language described in the 
Revised Report, The main omissions are the following: 

- only the standard input and output files SYSIU and SYSPRDJT 
are supported. All l/O is done through the use of READ 
READU^, inilTE, ITRITELN, EOLN, and EOF. The I/O is not ' 
exactly standard; in particular, formatting is also allowed 
on input, 

- the program header is not used, SYSIN and SYSPRINT must 
always be provided. 

- packed arrays and records are net supported, 

- only the simple forms of procedures 1TEI7 and DISPOSE are 
allowed. Tagfield values may not be specified, irlo garbape 
collection is done. 

- global labels are not implemented. 

- subranges of characters are not allowed. 

With the above exceptions, the language supported is very close to that 
described in the Revised Report, 

Seven standard scalar types are provided: SHORT' mEGER. lOTEGER 
REAL. LOHG REAL, BOOLEiMvf, CHAR and STRING, 

Built-in functions include: AES, SQRT, EXP, LN, LOG, SIN COS 
ARCTAN, SQR, SUCC, PPJ3D, ODD, ROUITD, TRUITC, OPJ), CHR, CARD Ind ' 
CPIITIl'IE • 

The compiler checks for overflows on all tables and produces terminal 
error messages. The main table sizes may be modified using parameters 
on the EXEC card. -The source for an initialization routine will be provided 
which sets the size limits for all compile-time tables, and also sets defaults 
ThL^'c!^^ -laiTs (such as whether run-tdme checking code should be produced). 
This should allow the compiler to be tailored to suit the needs of anv 
installation. The remainder of the source will not be released at this time. 

^ There are two main liiP.itations imposed by the compiler. The maximum 
nest allowed for procedure and • function declarations is 5. and all proeram 
segments are restricted to 4K bytes of code, ^ h ^ 

The compiler has not undergone large-scale production testing- for 
this reason no guarantees are made as to its reliability. Considering the 
interest which has been shown in the compiler, we feel that we cannot Justify 
delaying its release any longer. j^^ouxi./ 
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The PASCAL compiler may be acquired by sending the PASCAL Order Porm 
and the signed DISTRIBUTION AGRLE'iElIT together with $50 (payable to the 
Department of Computer Science, University of Ilanitoba) , to the PASCAL 
Distribution Manager. 

The tape will contain the object nodules necessary to generate the 
compiler along with sample JCL, test programs and a user's guide. . 

After a suitable test period an updated version of the compiler may 
be offered, but no promises to this effect are made. 

X7e hope that few problems will be encountered. 

Please see the enclosed material If you are interested in ordering tKe 
compiler. 



PASCAL Distribution >Ianager 
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UNIVERSITY OF MINNESOTA 

TWIN CITIES 



University Computer Center 

227 Experimental Engineering Building 

Minneapolis, Minnesota 55455 



July 16, 1975 



To the Editor, Pascal Newsletter: 

We at the University of Minnesota would like to participate in a Pascal 
User's Group for North America to help distribute and support PASCAL. 
In communications with various other sites: Alfred Towell at Indiana 
University, Dave Tarabar at University of Massachusetts, and George 
Richmond at Colorado University, there seems to be a desire to form 
such an association. Perhaps a kind of conference would be appropriate 
for getting started. 

The usage of PASCAL at our site has been heavy lately. PASCAL is being 
used in general applications on not only the MERITSS CDC6400 state-wide 
timesharing network but also at the University of Minnesota's batch (> 
computing facility, a CDC CYBER 74. Ve have locally modified the PASCAL 
system totally in a cosmetic way: fixing bugs, making interface changes 
for the KRONOS 2.1 operating system and making PASCAL available under 
the TELEX timesharing supervisor available with KRONOS. A dozen or so 
sites have our modifications for interactive usage^ however we don't 
know as yet how useful they are for INTERCOM under SCOPE 3.4, although / 
Urs Ammann of Zurich seems to think we went about our changes in a decent 
way, which may make them a good model to follow. 

We would like to caution others about what "improvements" they make to . 
their implementation of standard PASCAL.* For one thing the old compile 
to core PASCAL compiler for CDC machines was changed by many people in 
ways that violated the underlying principles of the language. For 
example: • simplicity in design (which implies simplicity in description- 
in other words, few exceptions to the rules); a specific infraction 
being the addition of a step specification in for loops by one installa- 
tion. 

In reply to a letter to the editor of 6 August, 1974 by George Poonen 

in Pascal Newsletter No. 3, we would like to reply that we also deplore 

"dialect^s" of PASCAL. However, BLAISE and SUE are not dialects but' 

other PASCAL-like languages. Further, the Axiomatic Definition and 

the Revisied Report define the standard semantics and syntax of the language. 

* See the very interesting article: "An Assessment of the 
Programming Language PASCAL" by Niklaus Wirth in the 
June, 1975 issue of SIGPLAN Notices , Proceedings: 
International Conference on Reliable Software. 
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If what is meant is trying to resolve a standard for extensions to the 
language (such as a value- initial! nation facility) then that is another 
question. Perhaps this should be investigated. 

To have PASCAL succeed at a given installation (with the goal of being 
used as much or more than FORTRAN) may require the local maintainer's 
recognition of his or her resonsibility to and power over the lives of 
all the PASCAL users affected. Also consider the ideas put forth by 
Prof, William Waite, Colorado University, in a guest editorial to the 
Vol. 3, No. 3 1973 issue of Software Practice and Experience . He uses 
the analogy of organisms (language processors) in an ecosystem (computer 
center) . PASCAL is a very good product which sells itself -but by giving 
the compiler inadequate support, it can fail with certainty. Support 
includes not only simple availability, but also publicity and all the 
•other amenities of programming life which now make FORTRAN easy to use. 
Examples are utility routines, libraries, program preparation equipment 
with the proper character sets, etc. 

This summer we are engaged in additional enhancements to PASCAL'S 
support at the University of Minnesota. The Computer Science Department 
here has now adopted PASCAL throughout its curriculum. By October we 
will be willing to share with other sites several of the documents we 
will have produced. 

Andrew Mickel and John Strait 
University Computer Center 
227 Experimental Engineering 
University of Minnesota 
Minneapolis, MN 55A55 ^' 



I I'f II ^^'^^^^^'^^ INSTirUT K0BENHAVNS UNIVERStTET 
I Jt\ L/ SIGURDSGADE 41, OK-llOO K05ENHAVN, DANMARK, TLF, (01) TA 94 66 



Mr. (reorge H. Richmond J-oly 25, 1975 

University of Colorado • JS^/Ha - 

3645 Marine Street 
Boulder, Colorado 80302 
U.S.A. 



Dear Mr. Richmond. 

Having received your list of PASCAL implementations 
I will ask you to correct the infonnation of our compiler 
thus: 

Implementation Route : PASCAL-P1 Bootstrap 
Implementation Status; Complete, Available for 

di strihution . 

Sincerely 

JT , Steensgaard-Madsen 
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PRELIMINARY DESCRIPTION OP A 
PASCAL COMPILER POR UNIYAC 11 00. ' 



*J» ^teensgaard-Madsen 
Datalogisk Institut 
Sigurdsgade 41 
DK-2200 Copeiihagea 
DENMARK • 



Introduction, 

The following text describes in short a PASCAL compiler 
for UNIVAC 1100 machines operating with EXEC 8. The system 
is developed from a PASCAL P compiler obtained from'prof- 
fessor Niklaus Wirth. The work has been done at Datalogisk 
Institut, University of Copenhagen by three students'* ' 

Ame Kjser 

Jan H031inid Nielsen 
Henrik Snog 

and a teacher 

J0rgen Steensgaard-Madsen 

The present ( preliminary ) description is not complete 
in every detail, but tries to convey all relevant infor- 
mation to the vast majority of users* It should be used 
together with the book 

PASCAL User Manual and Report 
by. Xathleen Jensen and Niklaus Wirth 
Springer Verlag 1974 

( Lecture Notes in Computer Science no. 18 ). 

1? 



Representation of PASCAL programs* 

The representation of PASCAL programs for UNIVAC 1100 
is based on the standard representation using ASCII • 
character set. This is converted^ to PIELDATA using^ the 
rules fixed by UNIVAC, except for opening and closing 
brace, { and } , which are not used. This means that 
t is converted to A and that comments are enclosed in 
(* and *). 



Restrictions. ( July 75 ) 

Variables of type TEXT, except INPUT and OUTPUT, cannot 
be used. Page procedure is not implemented. 

'DISPOSE is not implemented. 

Pile components containing files cannot be used. 
Standard procedures cannot be passed as parameters. 
Pields of packed structures cannot be substituted for- 
yar parameters. 

Sets must be over base types containing at most 72 values 
( in case of INTEGER it must be a subrange contained in 
0 71. ). 
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Additional standard identifiers. 



const ALEALENa =12; 

type ALFA = PACKED ARRAY [ 1 .. ALPALENG ] OF qHAR; 

HALFA = PACKED ARRAY [ 1 • . 6 ] OF CHAR; 

procedure HALT; 

(* terminate execution *) 

procedure MARK ( var I. : INTEGER ); 

returns with I information to be used in recollecting 
storage allocated "by subsequent calls of NEW *) 

procedure RELEASE ( I: INTEGER ); 

(* releases storage allocated by calls of NEVT since 
the call of MARK that must have set I *) 

procedure WRITEPAGE; 

(* advances the printer so that next line is printed 
as fist line on a new page *) 

procedure CLOSE ( var F s any file ) ; 

(♦ this is a file operation, which must be executed 
as the final operation on external files ♦) 



Input / Output. 

The procedures read and readln take as parameters variables 
of type CHAR, INTEGER, REAL, HALFA.and ALFA. Except in case 
of CHAR, where just one character is read, leading blanks 
are skipped and the following characters are analysed. In 
'••case- of ALFA .( HALFA ) at most 12(6) nonblank characters 
are read and stored left justified and blankfilled. With 
multiple parauneters an error exit caused by an end of file 
condition will only occur if EOF is TRUE prior to the call. 

HI 



Parameter specifications. 



A name may be associated with a specification of formal 
parameters. This is done in the parameter definition part 
placed after the variable declaration part. The syntax is 

<parameter definition part> ::= 
par am <parameter declaration> ; 
{<parameter declaration> 

<parameter declaration> ::= <parameter identifier> = 
( <forraal section> {; <formal section>} ) 

The parameter names may then be used in the declaration 
of procedures and functions 

<procedure heading> ::= 
procedure <identifier> ; | 

procedure <identifier> ( <specif ication> ); 

<function heading> : :•= 

function <identifier> : <result type> ; j 

function <identifier> ( <specif ication> ): <result type>; 

<specification> ::s= 

par am <pararaeter identifier> | 
<formal section> {; <formal section>} 

<formal section> <formal parameter section> [ 

procedure <identifier> (• <parameter identifier > ) [ 
function <identifier> ( <parameter identifier> ) : 
<result type> 

This syntax allowes the complete specification of formal 
procedxires and function?* which is required in PASCAL for 
DNIVAC 1100. 

BE. 



Loop statement. 



Jot historical reasons the loop statement is included in 
PASCAL for UNIVAC 1100. 

<loop statement> 

loop { <statement> ;} 

exit if <expression> [; <statement>} 

end 

The program scheme 

loop P1 ; exit if B1 ; P2 end 
is e(iuivalent to 

P1; vhile not B1 do hegin P2; PI end; 
Case statement. 

In the case statement case lahels may he specified hy 
subranges in usual notation. 'The final end in a case 
statement may he replaced hy otherwise < statement > meaning 
that the statement following otherwise will he executed if 
hone of the lahelled statements is selected for execution. 
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TECHNISCHE HOGESCHOOL TWENTE 



ONDERAFDELING DER TOEGEPASTE WISKUNDE 

Mr. G.E. Richmond 
University of Colorado 
• Boulder Colorado 8Q302 
Computer Center 

ONDERWERP: JCENMERK: TVn5/lM/302 ENSCHEDE. 11 augustus 1975 



Dear Hr. Richmond, 



Regarding the status of the PASCAL-implementation for the PDPIJ series. 
Date: 8 august 4975 

Implementation Route; PitSCAL~Pl, Cross_ Compiler described in PASCAL 
to he run on PASCAL system for DEC-JO. * 



Target Machine 



: PDPJ] series, no O.S. requirements (all models). 



Implementation Status rTestphase nearing completion. Available for 
Distribution by Dec. 1975. 

Res.trictions : except for standardfiles INPUT & OUPUT^ files 

,are not implemented. Jtimp out of procedure 

not implemented. 



Extensions 



formal/procedure/f unction specification required. 
Array-parameters with unspecified bounds are 
allowed. Functions may deliver results of any 
type. 

Yours sincerely:^ 

Drs. C. Bron. " ' 



ENSCHEDE- DRIENERLO - POSTBUS 217 - TELEFOON; 06420 - 991 11 - TELEX 44200 
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BASSER DEPARTMENT OF COMPUTER SCIENCE 



School of Physics (Building A28), 
University of Sydney, N.S.W. 2006 



15th August, 1975 



Mr . 6 . H . Richmond , 
University of Colorado, 
Computing Centre, 
3645 Marine St. , 
Boulder, Colorado, 
U.S.A. 80302 



Dear Mr. Richmond, 

In response to your circular of June 5 , I am 
providing the following information. 

As Dr. Sedgwick recently left the Department in 
order to take up a position in Toronto, the contact for 
the local Pascal-P2 implementation is myself. The status 
of the implementation is "progressing" with completion 
anticipated around the^ end of this year. The main hold- . 
up has been the lack o'f documentation for the B1726's 
operating system. 

Since the B1726 is_ .user -micro pro grammable and bit- 
addressable, the implementation strategy is basically that 
of microcoding the Pascal-P interpreter. <In fact, all 
languages on the B1726 are implemented in this manner.) As 
well, the compiler has been modified so that it supports 
the EBCDIC character set and generates "machine" instructions 
which support bit-addressable data items of arbitrary length. 
Our configuration parameters have been chosen as follows: 
16777215, 25, 34, 8, 1,72, 24, 16, 24. Please note that the 
unit of storage is obviously the bit, and that the setsize 
of 72 is arbitrary and will be extended to 256 eventually, 
to allow sets of chars. Another consequence, of bit- 
addressability is that the packed keyword becomes superfluous, 
thus eliminating one "restriction" in the present compiler. 

It is also encouraging to observe that initial 
estimates of the compiler's size place it well below that 
of the Burroughs-supplied compilers (including Fortran, 
Cobol, RPG), with the exception of the Basic compiler. 



Yours sincerely, 
Antony J.Gerter 

ZS 



University of Florida 

Gainesville, 32611 



Intercollege Department of 
<:O^VPUTER AND INFORMATION SCIENCES 
51 2 Weil Hall 
904-392-2371 



August 18, 1975 



0«gr»« Programs in th« Colt«ge« 

ARTS AND SCIENCES, 
BUSINESS ADMINISTRATION 
and ENGINEERING 



Mr. George H. Richmond 
University of Colorado 
Computing Center 
3645 Marine Street 
Boulder, Colorado 80302 

Dear Mr. Richmond: 

As I mentioned in our telephone conversation last week, I have successfully 
transported the PASCAL 'P* compiler to the TI 98 OA, a 16 -bit word minicom- 
puter. 

Machine requirements are: 

1. Minimum of 36K of main memory (4K for operating system) 

2. disk 

3. Silent 700 console with dual cassettes . 

The P-code for the compiler occupies 27,936 words (2 words/ in struct ion) and 
the loader -interpreter occupies 3,744 words. Storage in main memory is dy- 
namically allocated so the system can be run on any machine having at least 
36K of main memory. 

Since the P-code for the compiler is so large (approximately 17,000 records) 
it was physically split into three parts on a large computer and transmitted 
across telephone lines to cassettes. Then it was merged back into one file 
on the TI disk. 

Pertinent configuration parameters are; 

INTSIZE = 1 SETSIZE = 4 

RiEALSIZE = 2 PTRSIZE = 1 

CHARSIZE = 1 STRGLGTH = 6 

BOOLSIZE 1 INTBITS = 15 



Sincerely yours, 

Gilbert J. Hansen 
Assistant Professor 




IN REPLY PLEASE QUOTE: 



IF TELEPHONING OR CALLING 



The University of Tasmania 

Postal Address: Box 252C, G.P.O., Hobart, Tasmania, Australia 7001 
Telephone: 23 0561. Cables Tasuni' Telex: 58150 UNTAS 

Information $cjence D^pgrtment, 

I8th August, 1975. 



Mr. Richmond. 



I8th August, 1975. 



Mr. G.H. Richmond, 
Computing Center, 
University of Colorado, 
BOULDER, COLORADO. 



Dear Mr. Richmond, 



Useful Information for other impl ementors : A few sheets showing the (static) 
frequency of occurrence of each of the SC-machine instructions is 
available on request, also doublet frequencies. This shows which 
instructions may be ignored or simplified in interpret i ng -or macro- 
expanding the code, and where most of the space goes ( and very 
likely the time too ). Since this route was discarded as unnecessarily 
difficult, no dynamic execution frequencies are available. 

Also note that sets of bits are sufficient to bootstrap up the 
Pascal-P compiler itself (the largest set has ^8 elements). The 
statement in the documentation relating to 59 bit sets is simply a CDC 
hangover which has not been checked. This has significance to 48-bit 
machines (as B67OO) . 



Likely completion date : November/December 1975. 



In response to your letter relating to communication between Pascal 
implementors, I can only heartily agree. I therefore give you the following points 
relating to our work on Pascal-P2. 



Yours sincerely, 



use of Pascal In 



Status : incomplete (1975 August) 

Purpose of implementation : investigation of portability; 
teaching. 

Route : Piggybacking via PASCAL-1 on Cyber 11 to produce Burroughs B67OO 'assembly 
code', thence 'assembly code' to be processed for route: This two-step 
process separates the easy part (generating B67OO code) from the hard part 
(getting the B67OO to accept It). 

impression of package : Far too little thought given to portability and to 

documentation. Pascal-P2 still betrays its heritage as a CDC-blassed 
product in subtle but annoying ways, though vastly better than earlier 
Pascals; it remains a test-bed product designed for a restricted purpose, 
and despite the claims made for it In the documentation, could be made 
vastly easier to port (whether bootstrapped or piggybacked). 




A.H.J. SALE, 
• Professor of Information Science. 



Main Implementation difficulties : Doing sensible things on a highly structured 

computer (without a 1 Inear von-Neumann memory) with multiple-word objects, 
particularly allocated in the heap. It seems a great pity to have to forego 
the many advantages of the B67OO architecture because of some of Pascal's 
features, and yet trying to use all the good features may well lead to 
excessive memory fragmentation and segmentation; also possibly complex 
code generation for different handling of constructs. For example should 
all records be individual eegments? or should a simulated linear store 
(« a large declared vector) be used to pretend to be a more conventional 
machine? 



UNiVEIlSITY OF CALIFORNIA, SAN DIEGO* 



DEPARTMl£NT OF APPLIKD PHYSICS AND INFORMATION SCIENCE 
COMPUTER SCIENCE DIVISION , C-0X4 



LA J OLLA, CALIFORNIA 92093 

August 22, 1975 



Professor A.H.J. Sale 
University of Tasmania 
Box 252C, G.P.O. 
Hob art, • ■ 
Tasmania 7001 



Dear Professor Sale: 



The short-term objective for the B6700 compile-assemble system is to provide 
a back-up means for students to use for PASCAL homework problems starting in late 
September. Our PDP-11 equipment is not all here yet, and we clearly will not be 
ready to use the small machines with students during the first few weeks of the 
Fall Quarter. Over the time period of the academic year about to start, we will 
almost certainly have someone complete the job of making a PASCAL compiler that 
c;an generate B6700 code directly. Yet to be resolved is the question of whether we 
can map the PASCAL data structures into the array-row structures of the B6700 
without doing violence to the basic approach, of the P-compiler. 

The interpretive system is slow on the B6700, as might be expected. The major 
consumer of time is the low level character processing in the INSYMBOL and NEXTCH 
procedures. We have changed these procedures completely, so as to depend upon 
installation intrinsic functions (Standard Procedures) th.at make use of the B6700* 
string processing hardware. The GETSY>I intrinsic returns information on each 
successive token in an area of stack that serves as a scanner information block. 
This provides a clean interface between compiler and interpreter, but it runs about 
half as fast as an earlier less-clean version (part way through, the bootstrapping) 
in which virtually all of the work of INSYMBOL was done in an ALGOL intrinsic. 
The current B6700 interpretive version takes about 10 minutes of processor time to 
compile the source file from Zurich. We expect the compile-assemble version, and 
also the PDP-11 version, to run roughly five times faster than that. 

During the next two months we will be up to our ears in alligators getting 
this system completed well enough to use for teaching. At a later stage, I would 
be happy to share more details with you. 



We are indeed working with PASCAL on the B6700. Whether the work is of 
immediate interest to you is another question. Making PASCAL into a stable B6700 
product for users is a secondary objective of our project. Our primary aim is to 
create an interactive student debugging environment on the PDP-11, with virtually 
all of the software written in--P-ASCAL. 

The overall objectives of the project are described in the enclosed project 
prospectus. Students will interact with PASCAL on the small machines in a manner 
very similar to the debugging environment of APL on IBM 360/370 systems. PASCAL 
is interpreted using a modified version of the Zurich P-Machine recently released. 
The main purpose of the modifications is to reduce the size of the compiled code 
so that the PASCAL compiler can fit within the limited core of a small machine. 
Yes we have done the same kinds of statistical studies represented in the reports 
you kindly sent, though our data is not in as elegant a form. We are confident that 
the compiler "can be run on a PDPll with at least 20K words of memory. We are hoping 
to reduce that amount • further to perhaps 16K, when time permits. Currently the 
interpreter is operating, but has yet to be tried with the whole compiler on the 
PDP-11. 



Sincerely, 

Kenneth L, Bowles 
Professor (Computer 
Science) 
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We -are using the modified PASCAL compiler on the B6700 as a tool for developing 
the new PASCAL system, and generating pseudo-code for the PDP-11. Having started 
with an interpreter for the Zurich P-Machine, we have progressed through various 
stages of bootstrapping to get a system compatible with the PDP-11 . obj ective, and 
the interactive system objective. Concurrent with the work using the interpreter, 
we also have an advanced student programmer writing an assembler which converts 
the compiler P-code output into directly executable B6700 code. The B6700 code 
has been executed with small programs, and should be running the whole expanded 
compiler within a week or so. This compile-assemble system manages its memory in one 
large array in a fashion similar to that used on conventional machines. We are 
using the B6700 SWAPPER for much of our batch work, and hence have been able to use 
DIRECT (non-overlayable) array space for this purpose to enhance the speed of the 
processing. 



|p The - University of Tasmania 

^C^^ ^ AckJrtw: Box 252 C. Q.P.O., Mobari, Tasmania 7001 

S^v£^r^ T«»«phooa:23 056l, Cabks Taaun^' Talax: SBISO 

« Bt«.Y KCAsc oooTt: loformation Science Dept. 

Stb September, 1975. 
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If Tf UPMOMIMQ on CAUIHQ 



Mr. Richmond, 
Computing Centre, 
University of Colorado, 
36^5 Marine St. , 
BOULDER, COLO . 



Dear Mr. Riclimond^ 



Pascal -P Documentation 



I have received, in response to some of my 
correspondence, a copy of some error notes on Pascal-P 
detected by the University of Karlsruhe. The documentation 
is in German, and I have attempted to translate the sense 
of the notes with the results attached. I hope that this may 
be of use to other Pascal-P implementors . I have aslced the 
originators to see if my translation accords with what they 
thought they said in case I have missed some idiomatic nuance 
(technical German terms are quite as mystifying as English 
ones until decoded; witness "bugs") and I shall let you 
know if there are any alterations or additions. 

Yours sincerely, 
A.H.J. SALE, 

End. Professor of information Science. 
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LIST OF PASCAL DEFECTS 



The following errors and defects were fpund during the implementation of the 
PASCAL system. 



1. Defects In the compi ler which adversely affect the bootstrapping to different 
computers. . 

(a) Assumptions are made about the collating sequence of the character set which 
are neither warranted nor defined in the axioms concerning character type. 
In particular: 

- The translator assumes that the characters '4-' and enclose all 
operators In the declarations of 

SSY, SOP; array ['+;..';•] 

- The test which determines whether a character is alphanumeric Is 
formulated as 

ORD(CH) >- ORD('A') AND ORD(CH) <- 0RD('9') 

(b) The compiler accumulates errors only during the translation of a line of 
source text. At the end of the translation the compiler cannot determine 
automatically whether the gener^ated code is correct, or whether the PASCAL 
program was in error or not. 

(c) The constant CHARS I ZE, which T's used to parameterize the compiler for 
various computers, is employed with the meaning "Storage units per 
character" and not "characters per storage unit". While this Is clearly set 
out in the documentation It Is unexpected. 



2, - Deliberate restrictions Imposed by the compiler . 

(a) Only the first 8 characters of Identifiers are significant In distinguishing 
them; remaining characters are ignored. 



(b) String constants are limited to a maximum of l6 characters. 

3. Errors In the compiler. 

(a) When translating a PASCAL program which does not have the terminating symbol . 
END, the compiler hangs in an infinite loop. The error is In procedure 
NEXTCH. It has the structure: 

PROCEDURE NEXTCH; 
BEGIN 

IF'EOL THEN BEGIN END; 
IFNOT EOF (INPUT) THEN 

3EGIN *.."read next symbol and assign value to- global^'-'" 
END ELS£ WRITETCQUTPUT, ^^OF ENCOUNTERED') 
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In this case NEXTCH is called by SKIP (via INSYMBOL) until the terminating 
symbol Is read. If NEXTCH In the compiler Is not altered, the compiler 
loops endlessly. An error exit in NEXTCH would solve the problem but this 
Is not permitted In PASCAL-P. (The error was probably not noticed in the 
CDC- implementation as multiple calls to EOF with the value TRUE cause a 
program-dump in that system* This meaning of EOF is not endorsed in the 
PASCAL definition and Is not obvious.) 

(b) When in the procedure INSYMBOL a symbol is read which does not belong to 
the recognised symbols, an error Is signalled but the next symbol Is not 
read In. When SKIP Initiates the consequent search to recover from the 
error, the compiler finds Itself in a loop, as subsequent calls continue to 
find the undefined symbol. . . .*. 

(c) The variable EOL should be Initialised to the value FALSE (not TRUE), 
since otherwise the first action of the compiler Is to Issue a read 
command, and the counting of source lines starts at two. 

h. Aesthetic defects in the compiler. 

(a) To comply with PASCAL-P, the LOOP-EXIT construction has had to be deformed 
Into a REPEAT-UNTIL construction. The change was made with too narrow a 
view, with the result that the constructions are much more difficult to 
understand. The loop construction, which Is to be found In most procedures, 
has for example the following form (taken from INSYMBOL): 

REPEAT 

WHILE CH - • ' AND NOT EOL DO NEXTCH; 
TEST:=EOL; 
IF TEST THEN NEXTCH 
UNTIL NOT TEST; 

(b) There is an error. message which Is emitted not only by error number 117, 
but also with the message 'TXPE-ID' <identifier> , This message does not 
match the source line and the following error-messages (and their lines) 
In the procedure ENDOFLINE, but seems to be Issued immediately v/hen the 
error is recognised in the syntactic and semantic analysis. The cause has 
not been found despite an Intensi-ve search. Thereafter the layout of the 
program listing, error numbers, and error text becomes unrecognisable. 

5. Properties of the compiler which affect Interpretation. 

(a) The compiler produces the same commands as for all other objects for packed 
arrays of characters (strings). Also at the level of the interpreter 
strings must be treated as arrays of single characters. 



(b) Parameteri 5 i ng the compiler for the storcsize of sets (SETSIZE=2) does not 
result in efficient store utilisation in the interpreter. The formal 
parameters of procedures are set up with the maximum size of objects of 
type INTEGER, REAL, CHAR and SET. Similarly all load and. store commands 
ignore the type of the data- types and are not parameteri sed. As a consequence 
If the stack Is not to be full of objects all of the largest size, the load 
and store Instructions have to inspect type-tages In the Interpretive store. 



Keeping type-tags (as Implied by a. direct interpreter implementation) is 
Incredibly wasteful of store, and isufflcient thought has been given to the 
problems of wordslzc in claiming portability. 
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(c) The convention of the Interpreter is not followed when code Is generated 
for formatted output of strings. For example; 

WRITE(0UTPUT,'ABC' :10) is compl led to: 
LCA 'ABC 
LOCI 10 
LDCI 3 
LAO . 5 
CSP WRC 

The interpreter expects the code: 

LCA 'ABC 
LDCI 3 
LDCI 10 
LAO 5 
CSP WRC 



NOTE: Translated from the original GERMAN supplied by the University of 
Karlsruhe (1975 August 21), with free translation. 



1975 September 1 
A.H.J. Sale, 

Department of Information Science, 
University of Tasmania, 
G.P.O. Box 252C, 
HOBART, TASMANIA. 7001 
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PniVviV^sity of Colorado. 



1 September 1^/^ 



Tcda^f 1«= our uro>-cten r^lGcse date for PASCAl 0, a cor^pi 7er vmicn 
r^^ansla-i-GS PASCAL ' [Jenssn 197?-^1 into the intGrnedlato lanauane ,imvs 
n'a-'vs K'/^^o Tha c'-rioilor lias successfinly traDSlateii a nunhor of 
crc^rcr?, Inclucn-n itselfo All translctions have bGsn earned out on 
ti^p Control Data f;^■'^^^l; tiie proarc.ms (v/ith the cxcsptlon of the compiler} 
hava thsn bosn er.acuted correctly on tha ncnaral Precision l.3n!-,5 anc./or 
t'.--' Xi>*^ Si<Ti?) 3o As cf today, \12 hava been unable to corrip[e«.e a 
bootstvap of thG conpilsr onto sither tarast machine becausG of sv/.o 
constraints and harctev^ failures. 

At th« niorrant, v:a feel that our 1r.iple^r.antation aids {test progratriS, 
stnc-by-step procaciures) for Janus are inadequate. Therercre our 
estiiTiata of ir.pler.;ontation effort required by those unfanvmar vn ch 
Oanus is 3-6 m(?.n-r,onths. lie hops to correct this aerTciency m -cne near 
future e ' ' ■ 

nu'^ sstipat'-^ of the ouality of the current object code resultina from 
a trc-r-slation of PASCAL "to iianus to assenbly lannuane shows it to be 
Urr:.-r -lilian "b?st hand code" by a factor of 3 „ vie are worn nn on 
irsprovcrs-nts in t>a coripiler which we expect will reduce this facor 
considorablyo 

A r.QOcl ^i-al of intorost has beer. shov;n in this project^ and v-'s 
.M.j^J.^.p..„j^ foAi t;i?\t V'"' should adhere to our announced release datSo On 
th'^' 'other ''hand, in vie>/ of 1:he problems stated above, v/e nust warn 
prospective users l:hat tbe present version niay not be all unai. r.hey 
desire. Vie are willing to distribute copies or r.hp conpiler and 
cn—^nfiv-available test programs vni:h toe understand! net tna.. tney are 
not* to bo released by the recipients without a copy of this lettGr„ ^^y 
crpifients or suanestions which could inprovo further releases snouid be 
sent directly to' us. Please be specific, in your suaciest.lons. 

Th^ attached price list specifies the niaterial available j'n this 
rel'^^as'^'. Please make all checks payable to the Department of fiectncal 
Enqineerinci, Our next release is projected for 1 February l?7f . Anyone 
v:hb orders ma-cer1al now will automatically be inrormed of the project s 
status at that tir«o If you would prefer to v/ait until then to r-jna ouc 
what is available, please let us know. 



- Softi'jare Cnnineerlnq Hroup 



Referejice5_ 

Oensen, K», Mir'cnr ?U PASCAL User flanual and Peporto lil^SES. 
notes;rn Cppputer Science, 'JH ( 1 5^7 a) • • 

Vlait^ WJU , • liaddon, P.K. A h-^l^lMry neflrdtion. ,of • -^rJuSo 
Tech. Itept. SFR-75-1, TTepl. p'f iTectr-ical Fnnineerind, 
Uatversity of Colorado, 1?7R. 



A. IDE>]TIFXC?.TIQM 

rx-ograiti name-j PJvSCMaJ 

Authors: B.W, Raveuel/ C.B. Mason 

Date: 1 September 1975 

PASCALJ is a co;.Tipiler which trv^nslates the high-iavel l&j-iguage 
PiiSCrLb ho t>o intori*iediatG 3.Gngu?igC' Jc^nus. T'his compiler ^-ra? oriuT- 
inally vcritban inTASCJiJu^ a.nd uB-^d to translate itsairc to Janus. 
The orig5-nal PASCAL x-^^rogram is included in the Janus text as cc?.i- 
nients, and rnaiy ba extracted by selecting only those lines v;hich hc-.ve 
a period in the first ciierfnctej: position. All other linss should 
be ignored during extraction r and the periods in position 1 should 
be replaced by spaoes. 

PA»9CAL is definofl in the following bockf irhich is available 
froHi it{3 publiijher («Sr:)ringer-Verlag) : 

Jensen, K. ^ Wirth. N, PASCAL User Manual and Report. 
Lecture Notr-is in Corn puter Science ^ 18^ (1974) . 

It is necesssarj to indicate the character cet of the ho£;t 
computer on which PASCAL- J is to be implernentGd , as the cojripiler 
must provide a mapping from this oliaracter set to rtrs ..ovni. in- 
ternal representations. We are providing several standard charac- 
ter sets from V7hich one should be chosen; should some other char- 
acter set be required -pLe^aQGi -send a..j:l^itailed collating sequence 
for it. 

Character sets availab].©: • 

ASCII (full set/ 9o- or 64-charactGr subset) 
EBCD.IC 

CDC display code 

As a.n option r the co;api3.or can produce Janus codo in which 
the Janus stack of anonoTious operand.B is restricted to a depth 
of one through the use .of nai'.ied tc:j;porarieL * This inay b3 useful 
for ijcaplementatioiis on single acciTTiulator I'ttachincs. Indicate 
with your order xvhsther tlie compiled version of the cosrspiler 
should be so restricted or not- 

^ • DOCUMEUgATION 

S:l:G-75-1 a Preiipvinary Definition cf Janus 
SBC- 7 5-3 PASCAL J User's Guide and 
iTppleirtentat.ion Notos 

7- track magnetic tape ( 12 0 0- foot re 3l ) 1.75 lb $ 2 S . 5 0 

9- track magnetic tape (12 00- foot reei) l,"/5 lb $35,00 

(Deduct 98.00 from tape cost if you .'Jupoly a 12 DC-foot recil. 
We will accept longer- reels ^ b'at xvo r-uct chs.rge more for 
postage. ) 

3fe 



5 o;; $ 3.50 
2 cz $ 2.00 



Lecture Notes in Computer Science, .No, 18 
PASCAL - USER MANUAL AND REPORT 



Corrections to 


2nd Edition 


p. 51, 


1.16^ 


"setop(output) " "setop(autput) ; 


p, 56 , 


1.-6: 


"fi»» "f (.i)»» * . . 






'•g(i+1)" "g(j+1)» 






"gi" g C J ) 


p. 63, 


Fig.lOa: 


Number sequence should be reversedt 


P,6?r 


1.23: 


•»stricly" -> "strictly'* 


p. 77, 


1..18; 


move line 3" places to the left 


p. 98, 


i.iO: 


append " ' J . 


p. 102, 


1.7: 


last word should be "or" 




1.20: 


"bufffer" "buffer" 


p. 103, 


1.-6: 


"scaler" -> "scalar" ' 




1,-7: 


cnar, ana aJLra -> and cnar are JLxst-Bd 


p. 124, 


1.-14 and 


lr15:' "14" "15" 


p. 127, 


i:27: 


"18. A" "4.-A" 


p. 133, 


1.3: 


"two" "to*^ 


p. 135, 


1.5: 


"althought" ."although" . 




. 1.30: 


"subtstitute" -* "substitute" 


P.-140, 


1.11 : 


■"structure type" "structured type" 


p.i58. 




del.Bte linesi -12... -8. 



N. Wirth 
10. May 1975 

Additional Suggested Cocrectloas 

September 26, 1975 University Computer Center 
University of Minnesota 

Page/Line 



13/-3 "if" -> "If" 

69/-8 "the readability" > "readability" 

.72/-3 "element in the array" "component in the structure" 

81/2 "extent" -> "extend" 

117/ in the syntax chart for expression, change: 

7^ jc >• to <><=>= 

119/13 move the message right by 1 position 

126/-19 to -14 move the "i" index entries to the next page 

153/16 "(and at least once)" > "(at least once)" 

162/3 "end of line" > "end of line" 
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The; CotLECK of Wooster 

COUPUTBH CEHTER 

WoosTSR. Ohio 44091 



October 3, 1975 



Mr. George H. Richmond 
Computing Center 
University of Colorada 
3645 Marine Street' 
Boulder, Colorado 80302 

Dear George: 

The reply to complaints about interactive I/O in PASCAL 
( Newsletter ^ Number 3, November 1975, p. 13) is not satisfactory. 
READ, BEADLN, WRITE, and WRITELN should all function, as easily 
(although possibly not exactly the same) for an interactive user 
as they do in the batch environment. The solution suggested is 
not appropriate to beginning students. Moreover, "segmented" 
files are peculiar to CDC systems. I'd like to see some other 
solutions to the problem. 

Sincerely, 

E. C. Zimmerman 

Director of Computer Services 
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CALIFORNIA 

INFORMATtOM HCICNCIt MB9-mO 



INSTITUTE OF 

PASADCNA, CAUrORNIA OliaB 



TECHNO UOGY 



October 22, 1975 



Mr. George H. Richmond 
Computing Center 
University of Colorado 
Boulder, Colorado 80102 

Dear Mr, Richmond, 

I enclose an announcement of the distribution of two compilers 
for Sequential and Concurrent Pascal . They have been running on 
a PDF 11/45 computer at Caltech since January, 1975. This 
announcement may be of interest to readers of your excellent Pascal 
Kswsletter, 

Yours sincerely, 
Per Brinch Hanson 

■ '' t . " 
PBH;^t3Qh 



SEQUENTIAL AND CONCURRENT PASCAL FOR THE PDF 11/45 



Multi-pass compilers for Sequential and Concurrent Pascal (written in • 
Pascal) have been running on a PDP 11/45 computer at Caltech since 
January 1975. Concurrent Pascal is a programming language that ex- 
tends Sequential Pascal with classes, monitors, and processes (see: 
P. Brinch Hansen, The programming language Concurrent Pascal. 
IEEE Transactions on Soft-ware Engineerings 1, 2, June 1975). The 
compilers generate virtual machine instructions simulated by threaded 
code, 

A single-user operating system written in Concurrent Pascal has been 
in use at Caltech since May 1975. The Solo system supports editing, 
compilation, execution, and storage of Sequential and Concurrent Pascal 
programs. These programs can call one another recursively with arbi- 
trary parameters. Input, processing, and output of files on console, 
cards, printer, magnetic tape, and disk are handled by concurrent pro- 
cesses. 



Solo is the first working operating system written exclusively in a high- 
level programming language that includes concurrent processes and ab- 
stract data types. System protection is -achieved largely by means of 
compile-time checking of access rights. . It is not supported by hardware 
mechanisms at run-time. 

Manuals and distribution tapes for the Solo system and the Pascal com- 
pilers are now available from Caltech* For mpre information on how to 
obtain copies, please write to 

Per Brinch Hansen 

Information Science 286-80 
California Institute of Technology 
Pasadena, California 91125 



CERN 



DD-HJ-pp 



28-10-1975 



Memorandum 



To : Anybody interested 
From : Hans J^raandstad, DD 
Subject : PASCAL 



An initial version of PASCAL is available imder' SCOPE 2. .1.2 on the 
CDC 7600 computer system. The coiTipilcr should be 1001 compatible ivith the 
PASCAL conpiler currently available under SCOPE 5.4 (CDCGOOO) , as seen from 
a users point of view. However, the I/O system under SCOPE 2,1.2 is somehow-; 
different from SCOPE 3.4; no CIO exists, hence Record Manager is used. 

The project vas initialised because it was thought to be a relatively 
small amount of work. Tliis i\as based on tlie follov.-ing compatibilities 
bet\s^een the t\\o operating systems: 

1. Instruction repertoire and word length tlie same . 

2, Loader relocatable binary files created on CDC 6000 can be loaded 
on the 7600. 

Iri fact, the design (of new I/O system) , coding and testing (not yet completely 
finished) was accomplished in 'v.5 weeks full vrork (1 Jnan) • 

Briefly, the following changes were necessary: 



1) Compiler: 

a) Redefinition of EEETSZ and QiEFETSZ 

b) Generation of RJ P.TER^I instead of "end request". 

c) .Insertion of a small loop at the end of the compiler which will 
ensure reading of the input file until EOF condition true (lor 
compatibility with all other SCOPE 2,1.2 utilities). 

2) I/O System: 

Rewriting, changes and additions amounting to *>/ 1000 cards of 
assembler code. 



A subset of the record manager record t>'pes under SCOPE 2.1.2 are 
supported according to the follov/ing table: 
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UNIVERSITY OF CMtBRIPGE COMPUTING SERVICE 



Pagical Interpretive System (Cambridge) 



The enclosed document gives details of this system, vhich is tkow available 
for distribution. 

If you vould like a copy of the system, you should write to:- 
Dr, J. Larmouth (Pascal) 

University of Cambridge Computer Laboratory 
Corn Exchange Street 
CAJIBRIDGE CB2 3QG 

England Tel: Cambridge 52435 

stating whether you want the simple system (first two files described on 

the attached sheets) or the full system. You should also state any preferences* 

for magnetic tape density, tracks, or format, and may send us a tape if you wish* 

You should be prepared to 'pay a handling charge of £5.00, plus any cost of 
tapes, postage, etc. We will send you an invoice, and you should state any 
Order Number you wish us to quote, and the details of who to bill. The total 
charge is unlikely to exceed £10.00. 

You should also complete the attached Distribution forms, which allow for 
software to be sent either to a named person for use anywhere, or to an 
installation. Section A on the forms should be deleted as appropriate. The 
two lines following Section 5 should be deleted in a corresponding way, and . 
either an individuals name inserted, or the title of the installation. The 
forms should be signed at the end by an appropriate authority, or by the 
individual. We will complete the forms and return a copy with the software. 

Also enclosed is an incomplete copy of a letter which we send to "Commerciar' 
installations. This may well not be relevant to you. 

If you have any further queries, please do not hesitate to. write and ask. 



J. Larmouth 
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C? IIR TAP£ TENSITV, lAHEL, ETC HIAT^OU 



YOU SinULD J\L50 SEliD DliTAILS 

«MIT« AT PK^SSNT THE I/C PACKAGE CCNTMIiS ' 370 ' DEl>E>iDE>^CIE<^ 
BUT THIS VILL BE CHArlGiD, 



OP THE S 
AND A ?A 

ABOUT ?BW POUNDS. 



3C0U WILL BS ASKED TO SIG^J AN AG T^tE^tit^T NOT TO .^TSUSE Or« DI3F0 
rSTiiM^ ^AND rO Ar;r\IE to being 1I1VCIC£B for TH^i COST 0? HAMT^L'N- 

(urLn.s Y'ju sii;e us c?ib). the iuvgice should hct £xcfed 



UNIVERSITY OF WISCONSIN - PVU CLAIRE /EAU CLAIRE WISCONSIN 54701 



DEPARTMENT OF COMPUTER SCIENCE 



November 5, 1975 



Mr. George H. Richmond 
University of Colorado 
Computing Center 
3645 Marine Street 
Boulder, Colorado 80302 

Dear George, 



I believe the following information would be of interest to readers 
of the PASCAL newsletter, especially those contemplating the 
implementation of a PASCAL system. 



A PASCAL P-code interpreter has been designed and implemented in 
compatible ALGOL on a Burroughs B5700 at the University of Wisconsin • 
Eau Claire. Proof that the major design goal of the PASCAL-P 
project (easy portability) was indeed achieved is provided by the 
fact that an interpretive PASCAL-P system was up and running on the 
B5700 in only 4 student-weeks. The undergraduate student writing 
•the P-code interpreter in ALGOL had seen only one PASCAL program 
prior to this project (the POSTFIX program on page 75 of the PASCAL 
User Manual) and had taken one 3 semester-hour course in Burroughs 
compatible ALGOL. The implementation of the P-code interpreter in 
'compatible ALGOL was rather straightforward except for three areas- 
(1) character set representations, (2) the basic PASCAL I/O 
operations on text files, and (3) -the basic PASCAL set operations. 
I suspect that other implementers of the PASCAL-P system have 
encountered difficulties in these same areas. 



The documentation supplied with the PASCAL-P implementation package 
warned that every standard procedure or function involving files 
must specify the file concerned: the usual default interpretations 
do not hold. This difference between "standard" PASCAL (defined, 
presumably, by the PASCAL User Manual and Report) and PASCAL-P was 
verified in the compilation of "FCOUNT" (p. 60), "INSERT" (p. 61) 
and "MINMAX3" (p. 70). Each of these programs omits the file 
specifications required by PASCAL-P. These were the tjiree runs 
which terminated with expected errors - although the missing file 
specification in "MINMAX3" caused the compiler to go into an 
infinite loop. 

However, there are additional differences between standard PASCAL 
and PASCAL-P. These differences, unexpected since the documentation 
supplied with the PASCAL-P implementation package does not mention 
them, were revealed in the compilation of the following seven 
programs: "GRAPHl" (p. 30), "GRAPPI2" (p. 38), "CONVERT" (p. 17), 
"SETOP" (p. 51), "BISECT" (p. 79), ^'PRIMES" (p. 54) and "FCOUNT" 



The compilations of "GRAPHl", "GRAPH2" and "CONVERT" revealed that 
the built-in function "ROUND" is not a part of the PASCAL-P system. 
After adding a user-defined function called "ROUND" to each of these 
three programs, they compiled and executed correctly. 



The compilations of "SETOP'.', "PRIMES", and "FCOUNT" 
serious problem with the PASCAL-P system. PASCAL-P 
recognize as a legal <factor>the <set> alternative 



revealed a more 
does not 



[<expression> 



<expression>] 



See Appendix D of the PASCAL User Manual. Program "SETOP" was 
modified to compile and execute correctly by changing the 
assignment statement WK:=[M. .SU] to WK:= [M,T,W,TH,FR,SA,SU] . 
Similar changes to "PRIMES" and "FCOUNT'^ would no doubt make them 
acceptable to the PASCAL-P system. 

The compilation of "PRIMES" also revealed that the PASCAL-P system 
does not support the intrinsic functions "SUCC" and "PRED" . This 
is a serious omission and an effort is under way here at University 
of Wisconsin-Eau Claire to add them to the PASCAL-P system. 

The compilation of "BISECT" revealed that the PASCAL-P system does 
not support formal parameters of type function . (In this same vein, 
(One program, "FCOUNT", had both an expected and an unexpected error attempt to compile the "READINTEGER" procedure on page 160 of 

the PASCAL User Manual, revealed that files are not acceptable as 
formal parameters either.) 



The (ALGOL) P-code interpreter and the (P-code) PASCAL compiler 
were tested by compiling each of the sample PASCAL programs 
appearing in the PASCAL User Manual. The results of these 29 runs 
are summarized below. 

20 .programs compiled and executed without error. 

3 programs compiled with expected errors. 

7 programs compiled with unexpected errors. 



Additional tests are currently in progress to determine if there are LSssdif 
still other differences between standard PASCAL and PASCAL-P, 




13900 N.W. SCIENCE PARK DRIVE 
PORTLAND. OREGON 97229 
(area code 303) 644-4 Mt 
TEi£X No. 3^273 



The experience gained in compiling the sample programs from the 
PASCAL User Manual also revealed the following facts about the 
PASCAL-P system. 

(1) Errors in PASCAL source programs are flagged by number 
with no message attached-. Presumably the error numbers 
generated by the PASCAL-P compiler correspond to the 
error number summary appearing as Appendix E of the 
PASCAL User Manual. However, it is impossible for me 
to say with any degree of certainty that such is the 
case, 

C2) Keypunch errors in PASCAL source programs which generate 
references to undeclared identifiers will cause the 
compile phase of a PASCAL-P job to terminate with an 
"invalid index" or '"subscript out of bounds" message 
• if you are lucky enough to be running the P-code 
interpreter on a system which checks for such errors 
(such as the Burroughs B5700) . I hesitate to predict 
the results if the interpreter is running on a system 
without such checks . 

(3) There is no compile-time or execution-time range 
checking done by *the PASCAL-P system. 

These last three items force me to the conclusion that the PASCAL-P 
/System as^ it now exists is not suitable for use in a student 
environment. My hope is that the necessary modifications and 
improvements can be made to the PASCAL-P 'system so that in the near 
future the benefits of programming in PASCAL will be" available to 
students on a wide scale. 



George H, Richmond 
Univ. of Colorado 



Nov. 17, 1975 



Dear Mr, Richmond: 

Enclosed Is a copy of a paper to be given at the coming 
PECUS (Digital Equipment Corp, User's Society) meeting in Los 
Ang&ies, Dec* 5o It outlines what we have been doing for the 
past year. 

Pascal really has been a boon to us, and we are especially 
pleased that our adaptation to the PDP-11 for hardware control 
has worked out so well. 



David Rowland 
manager, programming 



Sincerely, 



Bruce A. Pumplin 
Assistant Professor of Computer Science 




PASCAL FOR SYSTEMS 

David Rowland 
Electro Scientific Industries, Inc. 
Portland^ Oregon 



ABSTRACT 



Electro Scientific Industries has implemented a Pascal compiler 
for the PDP-n, An extension to the language allows the direct 
control of external hardware at the Pascal Ijjjtal Experience 
Indicates that Pascal can be a very good real-time process control 
language and that the use of a single, high-level language is a 
great aid to a programmer's efficiency. 



I Electro Scientific Industries (ESI) builds 
computer-controlled laser trimming systems for the 
productions of hybrid thick and thin film circuits. 
The computer (a PDP-n/Oi|) controls all details of the 
trimming process: selection of measurement probes^ 
position and motion of the laser beam, power of the 
laser, and action of the digital voltmeter which makes 
the measurement. It handles a variety of interrupts 
and may have to do much data manipulation, 

The software for the system must cover all these actl- 
vlUes, be flexible enough to satisfy unpredictable 
future uses and be easy to understand and modify. 

U Pascal Is a general purpose programming langu- 
age proposed In 1971 by NIklaus WIrth, now at the 
Federal Institute of Technology In Zurich,^'* It was 
named to honor Blaise Pascal (1623-1662) , physicist, 
mathematician and philosopher. He was also the first 
person to build and offer for sale a calculating mach- 
' Ine.' 

The language Pascal was proposed because Prof. 
Wlrth.wanlcd a simple, modern language with which 
he could teach programming concepts without becom- 
ing tangled In details of the language. Existing langu- 
ages were Inadequate because Ihey were too complex 
(PL/I) , not convenient for teaching general concepts 
(Cobol); outdated and full of Idlosyncracles (Fortran), 
or too simple and lacking In expressive power (Basic). 

Pascal has these virtues: 

1. It has a clean, modern syntax, allowing easy par- , 
sing and one-pass compilation. Variable names may 
be any length. Statements are not boijnd to one line 

or limited one-to-a-line, 

2. The statements encourage the application of struc- 
tured programming Ideas, leading to programs that 
are easy to read and modify. 

3. * The basic data types (Integer, real, boolean, 
character) and data structures (array, record, set, 
file) may be combined and nested almost Indefinitely 
to yield data structures that accurately model the 
problem. 

H, All procedures and functions are recursive. 

Ill As we looked at existing languages, Pascal seemed 
Ideal , but it had not been designed to handle interrupts 
or control hardware. On the other hand, no language 
of like power had either. We decided to try to adapt 
Pascal for our own needs. 

To control hardware, we added two things to the langu- 
age; octal consUnts and ''ORIGIN'** 



An octal constant Is simply an Integer written In base 8 
and ending with "B", e.g. 16B = ll. It Is convenient 
In dealing with bit Information and core addresses. 

"ORIGIN" Is a feeyw^rd u^fed In vaH&ble declarations. 
It allows lh6 programmer to fix a variable at a <:hosen 
core location rather thdn letting the compiler choose 
the location, 

VAR PSW ORIGIN 177776B: INTEGER; 

allows one, without descending to assembler code, to 
read and alter the program status word. For example: 

PSW;=2^0B; 

Le^s dangerously, 

VARTABSTATUS ORIGIN 16*10168; INTEGER: 

refers to part of our hardware and allows us to sample 
the status of the laser beam positioning system, again 
without using any assembler code. 

IF (TABSTATUS AND 100B=0) THEN 

/* elc.V 

"ORIGIN" Is a machine-dependent idea, and It vio- 
lates the spirit of Pascal. However, It seems like the 
shortest and most natural bridge between the langu- 
age and our hardware. 

IV Our compiler accepts In-llne assembler code, and 
we use It to set up the Interrupt vectors. The inter-. 
nJpl handling routines, however, are written In Pas- 
cat, which holds the assembler code 'down to about 
a dozen lines. 



V Our Implementation of Pascal U written In Macro- 
11 assembler language, It |g ba»ed on a limited com- 
piler written at the University of Illinois, VVo 
changed the support from DOS to RT-1 1 and expand- 
ed the compiler to handle full Pascal. We were also 
able to shrink It drastically . More than 90% of the 
present compiler Is new code. 



Execution times appear very good. Informal bench- 
marks Indicate that Pascal Is about ^ times as fast as 
DEC RT-11 Fortran IV In a compute-bound sorting Job, 

VI Our customers receive the Pascal compiler plus a 
file of Pascal procedures which we have written and 
tested. They handle system Interrupts, select the 
measurement probes, move the laser beam, control the 
measurement subsystem, etc. 



VIII It look about ]H nftan-monlhfi to bring the compiler 
to its present state/ Another ^ were spent to create 
the support package and 4-6 on thA basic control rou^ 
Unes (of the trimming hardware. 

so 



X Our Pascal does have weaknesses, some curable, 
some not. I have already mentioned the Inconvenience 
of using Macro-1 1 as part of the compilation . We 
shall modify the compiler to produce binary directly, 
but It is templing to Write a new corftpller In Pascal 
and use the existing one td bootstrap It, 

There Is also the penalty of less-than-optlmum code. 
This Is partly made up for by the ability to produce 
well -structured programs, thus gaining In overall ef- 
ficiency. 

The support package Is a burden every Pascal pro- 
gram must carry. It could be reduced for special 
cases by eliminating the unused routines. Better 
would be to build it as a library and link only the rou- 
tines needed. 

Teaching Pascal is occasionally troublesome. Most of 
our customers are engineers, not programmers, and 
they might be more comfortable with something that 
looked like Basic. Pascal's recursively defined syn- 
tax and Its data structures appear to be the most dif- 
ficult concepts. However, for any program longer 
than about 25 lines, Basic's superficial attraction 
fades. Engineers are trained to solve problems and 



document their solutions clearly. This is quite in 
harmony with the top-down design encouraged by Pas- 
cal . Pascal's virtues start to become evident after 
about 3 days of training. 



XI There does seem to be an ecology of programming 
languages. They grow and decllr.-a, adapt and pro- 
duce descendants. What is to be Pascal's niche? 
Since It was designed as a teaching tool Its obvious 
place is In schools and its obvious competitor Is Basic. 
Pascal deserves to replace Basle for countless reasons, 
but Inertia will probably prevent that. Pascal Is catch- 
ing on at many universities and Basic may find itself 
pushed Into the fen country of grade schools and en- 
gineering offices. 

Our real-time Pascal lives In a world where standards 
scarcely exist. Each OEM expects to have to create 
his own language to match his own hardware, As 
OEMs learn the virtues of high-level programming, 
Pascal may become a model, but we are probably fated 
to see as many varieties as there are manufacturers » 

XII The work outlined here was done by a talented 
and spirited staff: John Ankcorn, Donald Baccus, 
Bruce Johnson and James O'Brien. 

The partial compiler that was the basis of our work 
came from Prof. Donald Gillies at the University of 
Illinois. We were startled to hear of his untimely 
death this summer and we are sorry It Is now not pos- 
sible to thank him for the great assistance he gave us. 
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THE HEBREW UNIVERSITY OF JERUSALEM 

Computation Center 27th November, 1975 




Mr. G.H. Richmond 
University of Colorado 
Computing Center 
36 A5 Marine Street 
Boulder, Colorado 80302 
U.S.A. 



Dear Mr. Richmond, 



In PASCAL Newsletter No. 3 (February 1975) a sample program illustrating 
interactive operation with PASCAL 2 appeared. We tried to run it here 
but found that this program fails to run unless the RESET (TTYIN) and 
REWRITE (TTYOUT) are replaced by GETSEG (TTYIN) and REWRITE (TTYOUT, 1) 
respectively, to avoid the rewind associated with the former. 

The corrected method was used successfully in interactive programs written 
here, with no need to change any supporting routine. 

Sincerelv yours , 



4 December 1976 

Mr. Alan Kortesoja said in a phone conversation that he had worked 
on the Comshare^ Inc. Pascal system. It is a threaded interpreter and 
runs on a proprietary XEROX Sigma (?) operating system. Anyone interested 
in further details can contact him at: 

Manufacturing Data Systems 
320 N. Maine 

Ann Arbor^ Michigan 48104 
(313) 761-7750 
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Shmuel Peleg 



Budapest I2.i2.i975. 



Dear Afc. Richmond 



state University of New York 

at Stony Brook 

Stony Brook, New York 11794 



Last year I had a study-tour in Switzerland, ^t EEF Lausanne in 
order to develop a PASCAL Compiler for CDC 3300 computer. This 
work was based on a PASCAL-P2 Compiler. 

In Hungary a team /Cs. Lehel, L. Almas i and J. Lehel/ finished 
the first step of this work. Now we have got a PASCAL Compiler 
- the first one in Hungary - for processing programs written in 
a subset of standard PASCAL. This subset does not process the 
type real and it contains some restrictions of PASCAL~P2. 

The second step of this work is to develop a compiler of stan- 
dard PASCAL. 



Yours faithfully 



Laszlo Almasi and 
Jen 6 Lehel 

Computing and Automation 
Institute of Hungarian 
Academy of Sciences 
H-1014 Budapest, Uri u. 49. 
HOTGARY 



Csaba Lehel 

Technical University of 
Budapest, Departement 
of Process Control 
H-1111 Budapest, Miiegyetem 
HUNGARY rkp.9. 



December 19, 1975 



Mr. George Richmond 

Department of Computer Science 
University of Colorado 
Boulder, Colorado 80302 



Dear Mr. Richmond; 



Enclosed is a notice for readers "of the PASCAL Newsletter, 
announcing the availability of a new PASCAL compiler for 
IBM 360 and 370 computers. 




Richard B 
Professor 
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Announcing a New PASCAL Comp-iler for 
IBM 360 and 370 Coinputers 



•A new compiler fully implementing the programming 
'language PASCAL, as defined by Niklaus Wirth has been designed 
and. built at SUNY-Stdny Brook. The new compiler' features 
extensive . compile- time and execution- time diagnostics, but . 
also generates efficient, reloadable code.. It* should be 
suitable hpth for student use and for compilation of 
applications programs. 

Distribution tapes' will be available about March 15, 1976, 
The designers plan to provide maintenance updates for a 
period of one year following the initial release. A 
tiominal charge will be made to cover costs of distribu'tion , 
documentation, and updates. Por additional information, 
please address Inquiries to: 



PASCAL Compiler Pro.iect 
Department of Computer Science 
SUNY a't Stony Brbok 
. Stony Brook, ^ew York 11794 



30 December 1975 

A student of Dr. Charles Fischer at the University of 
Wisconsin in Madison related during a visit that Dr. Fischer 
is working on a Pascal compiler for the Univac 1110. The 
initial release should be in the Pall of 1976, 

5"6 



COMPUTATION CENTRE 

POLISH ACADEMY OF SCIENCES 
P.O.Box 22 

00-901 WARSAW PKiN Air. George H. Richmond 

University of Colorodo 
Computing Centre, 364 5 Marine St. 

Dear Sir, 

Olir Computation Centre has an access to the CDC 6200 
computer .Since the beginning of 1974 we have used PASCAL compi- 
lers. At present \9e ore using the 6000 - 3.4 version and we 
must stress that the work with both compilers is a real satisfa 
otionl 

In November 1974 we received the PASCAL - P system. On 
the basis of this system we have realised the interpretative 
compiler of the PASCAL - P language working on the IBM 370/145 
computer. The access to. the PASCAL 6000 - 3.4 compiler gave us 
the possibility to modify the stack computer and to generate a 
new compiler written in P-code.We have made several modifica- 
tionsj e.g. ,we have canceled VMD Information and have added new 
instructions for sets processing. After these changes self-compi 
lation executed on 114 k bytes in time of 7 mln.30 sec;',.We have 
detected several errors in source compiler . There are as follon^ 

l.If the program structure is wrong and eof (input) becomes 
true, then the compiler will be looping and printing "EOF 
BNC0UNTIi;UED»'i-5 ^ 



2, In ref erences ot pt.^ type the condition pOnil is not 
olwuys checked, e,g. , procedure parameter lis t 
,,.if (vlkind = actual) and ( lspT.size4»ptr size) then,., 

D.Peoreflaing counter Icmax 'procedure body should be parameter 
rised similarly to initialisation of field vaddr for varia- 
bles input, output,prr,prd in procedure entstdnames should 
be also* parameterised. 

4. In procedure insymbol the call of nextch is lacking for the 
last alternative in case instruction. 

5. If the procedure is omitted, the variable forw in procedure 
procdeclaration is not initialized. 

6. The construction write(Ch) is correct, but write (inpu^ 
is not; It does not seem to be consistent. 

In the received source compiler there are often more 
than 72 or even 80 characters in a line, what makes 
additional difficulties in correcting, 

At present, we are working on the compiler of the whole 
PASCAL language for the IBM 3T0 computer. 

Yours 'sincerely 



EIDGENOSSISCHB 
TECHNISCHE HOCHSCHULE ZORICH 

Institut fur Informatik 

Ctauslusstrasse 55 
CH-8006Zflrlch 
p 01 /a2 0211 



M. Iglewski 



M. Mis s a la 



Mr. George H. Richmond 
University of Colorado 
Computing Center 
3645 Marine Street. 

Boulder, Colorado 80302. 



January 12, 1976 



Dear George, 

I have just read the letter by Prof. Pumplin of November 5 
addressed to you concerning our Pascal-P system. It brings 
up problems of which we had mostly been aware. In short, 
the Pascal-P system is not in a state where it can be used 
in a student environment. 

As you know, Pascal-P was produced on a side-line, and released 
because of urgent request for support of other implementation 
endeavours. Due to lack of manpower and in the hope that these 
efforts would soon produce other compilers of high quality, I 
refrained from pursuing Pascal-P any further. 

With some surprise I now recognise the growing influx of requests 
for Pascal-P, and have decided to invest some additional effort 
into this system. We shall concentrate on making the compiler 
foolproof, on incorporating a number of still missing features, 
an.d on providing a satisfactory documentation. I suggest that 
no more deliveries are made until this is done, and enclose a 
list of points that are going to be covered. A basic premise 
is to minimize the changes to the P-code, such that existing 
interpreters will still be usable with minimal additions. 

Also, .an effort is now being launched at preparing a .Release 2 
of our Pascal 6000-3.4 system. I also enclose a list^of points 
to be covered," emphasis being on removing some deficiencies and 
restrictions, and on a single system, from which those for other 
character sets can automatically be derived. 

Sincerely yours. 



Prof. Niklaus Wirth 
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Intended improvements on the PASCAL-P system 



1, Improve robustness of compiler. Compiler must not hang when, 
erroneous programs are compiled, 

^ compile-time checks of constants as array bounds and set elements 

- complete runtime checks^ 

« compiler must continue when encountering undeclared identifiers, 

- test of system through "bug farm", 

- systematic search for uninitialised pointers within compiler. 

2* Relax restrictions 

- accept read and write procedure calls without explicit file 
specification (allow defaults), 

- include Tnissing standard function (round, trunc, succ, pred ...), 

- allow set expressions of the form [a..b] , 

- allow empty record, declaration (correction of syntax), 
^ " formal procedures and functions (perhaps). 

3. Remove the tag field in theelements of the run-time stack. (Reduce 
stack size by half.) This requires a slight extension of the 
instruction repertoire of the interpreter, 

4. Include the possibility to satisfy alignment conditions in address 
generation ( storage allocation) . 

5. Provide a complete documentation on 

- remaining restrictions 

- how to bootstrap 

- the interpreter (hypothetical stack machine) 

- tape contents. 

(=>o 



RECAU 

DET REGIONALE EDB-CENTER VED AARHUS UNIVERSITET 
NY MUNKEGAOE . 8000 AARHUS C . OANMARK . GIRO 180639 .TLF.06-128355* 



r^A^^x. K. . January 12, 1976 

PASCAL Newsletter ' ' 

Mr. George H. Richmond 
University of Colorado 
Computing Center 
3645 Marine Street 
Boulder, Colorado 80302 
USA 



At the regional EDP Center, University of Aarhus, we are working on a 
PASCAL manual. We are interested in getting in contact with others 
working on similar projects. The reasons for starting this work were 
the following, 

PASCAL is our most used compiler and therefore we have 
a responsibility to offer a precise and complete description 
of the language. 

Our existing documentation Is covered by a number of 
publications. 

- Not all local modifications are documented. 

The existing documentation (known by RECAU) contains a 
number of loose and undefined constructs. 



Yours, 



^^^^ ^^^^'^''^^^^^'^^^ 
J0rgen Slaunstrup 

Ewald Skov Jensen 
6.1 



CALIFORNIA INSTITUTE OF TECHNOLOGY 



PASAOCNA. CAUrORNIA OliaB 

INFORMATION •CliKNCK a««-«0 



January 19, 1976 



Mr , George PI. Richmond 
Computing Center 
University of Colorado 
Boulder, Colorado 80302 

Dear Mr, Richmond 

I would appreciate it if you would supplement my 
note of October 1975 with the more recent announce^ 
ment enclosed for publication in the Pascal Newsletters, 



Yours sincerely. 
Per Brinch Hansen 




NEW CONCURRENT PASCAL REPORTS 



Concurrent Pascal is a language for structured programming 
of operating systems. A portable compiler developed on the 
PDP 11/45 computer is now being distributed. 

The available reports describe Concurrent Pascal and several 
Model Operating Systems written in the language. They also 
explain how to move the compiler and the operating systems 
to other computers. 



Reports 



Tapes 



Concurrent Pascal Introduction 
Concurrent Pascal Report 

The Solo Operating System 
The Job Stream System 
A R6al-time Scheduler 

Concurrent Pascal Machine 
Implementation Notes 



PDP 11/45 Tape 
Other Computer Tape 



To obtain copies, please write to 

Per Brinch Hansen 

Information Science 286-80 
California Institute of Technology 
Pasadena f California 91125 
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UNIVERSITY OF MINNESOTA 

TWIN CITIES 




University Computer Center 

227 Experimental Engineering Building 

Minneapolis, Minnesota 55455 




January 21,. 1976 

NOTICE OF THE FORMATION OF A PASCAL USER'S GROUP AND A CHANGE IN THE 

PASCAL NEWSLETTER MACHINERY 

Since the time John and I wrote the letter to the editor about forming 
a Pascal User's Group, one has formed. At the national ACM '75 conference 
held in' Minneapolis last October, Richard Cichelli of Lehigh University and 
Bob Johnson of St. Cloud State University urged me, to convene an ad hoc 
User's Group meeting. Thirty-five persons attended, and besides talking 
about all aspects of Pascal, v^a decided to work toward a more permanent 
organization and use Pascal Newsletter as the vehicle for coramunioation 
among members. 

I have subsequently talked several times to George, the current editor, 
about changes in Pascal Newsletter . After this issue I will become the new 
editor. Several goals I have as editor are; 

1) publish the newsletter more regularly (4 times per year). 

2) expand its scope; up until now subjects in the newsletter have 
included: notices of important events (new Pascal books, 
questionaires, etc.), history of Pascal, notices of other 
implementations and contacts, letters to the editor, etc. I 
would like to add to these: articles on Pascal philosophy, 

a forum for portable (applications) programs exchange, hints on 
promoting Pascal at your computer center, announcement of new 
program writing tools for a Pascal environment, etc. 

3) the newsletter as the official publication of the User^s Group, 
should provide the perfect forum for sounding out proposed 
changes to various implementations among the users before they 
are undertaken. 

4) accept articles from others on Pascal topics. 

5) expand the readership to users of Pascal as well as maintainers 
and implementors. 



1900 QUAIL ST. NEWPORT BEACH. CALIFORNIA 92660 
(714)833-9752 



February 12, 1976 



Mr. Nicklaus Wirth 

Berlchte des Instituts ftlr Informatlk 
Eidgenossische Technische Hochschule 
Ziirich, Switzerland 



Dear Mr. Wirth: 



Recently I have talked with several Pascalers about how to have a 
successful" User *s Group. Alfred Towell of Indiana University, Richard Cichelli, 
and Wilhelm Burger of the University of Texas, and I think that we should 
have membership dues. Members will automatically receive Pascal Newsletter 
and the dues will cover its production costs and mailing. In this regard, 
remember to urge your fellow Pascal friends whether in person or by announcement 
in your local computer center newsletter, to join in order to keep costs down. 
In the past the Newsletter has been funded by the charges George made for 
distributing Pascal compilers ($15.00 - 30.00). I propose a membership fee of 
four ($4) per year which includes 4 issues of the newsletter. Make checks 
payable to: 

University Computer Center 
and send dues to : 

Pascal User's Group 
c/o Andy Mickel 
UCC: 227 Exp Engr 
University of Minnesota 
Minneapolis, MN 55455 



ornn ^^^^ ^'^^"^ completed installation of PASCAL-P on the SEL 

8600 computer and would like to share with you some of the details of our 
experience. 

We obtained the configured compiler from Mr, George Richmond in 
Colorado. Our effort required two man-months. The implementation consists 
of an assembler/interpreter (including extensive P-level debugginq tools) 
written in 8600 FORTRAN. The P-compiler self-compiles in about thirty 
minutes, which is acceptable for our purposes. 

Our overall impression of the PASCAL-P kit is positive. The 
compiler is well -written and readable. The architecture of the P-machine was 
not difficult to emulate. However, our experience revealed several areas 
where improvement could save future implementers at least twenty-five per cent 
jLca^Jtrr^ ''^ required In the suggestions that follow, we have omitted 
those which are specific to the 8600. 



1. Character set difficulties 

Our original compiler used the ETH character set, with 
translation to the external ASCII set occurring on input 
•and output, (There is no choice for the implementer here, 
see configuration difficulties section.) We wished to 
convert the package to the ASCII character set for two- 
reasons. First, we planned to convert PASCAL-P to produce 
real" object code and thought that the best time to 
switch character sets was before other error-inducing 
modifications were made. Second, we felt that removing 
translation functions would Increase the speed of the 

^5 



DEPARTMENT OF ELECTRICAL ENGINEERING 
UNIVERSITY OF COLORADO 
BOULDER, ■ COLORADO 80309 USA 



2 February 1976 



PASCALJ 

The 1 February release of PASCALJ is now available for distribution. There 
have been no substantive changes in either the compiler or the definition of 
Janus since 1 September. 

We have completed the bootstrap of PASCALJ to the Xerox Sigma 3, and in the 
process uncovered and corrected a number of errors in the compiler. Storage 
mapping proved to be a serious stumbling block for the implementor, and hence we 
have developed a package of macros which accepts some target machine parameters 
(sizes and alignments of data objects) and maps the Janus specifications onto a 
linear memory, These macros now form a part of the standard distribution tape, 
and are described in report SEG-76-1. 

Our next release is planned for 1 September 1976. At that time we hope to • 
have made further progress in simplifying the task of Janus implementation. We 
are also studying the results of the Sigma 3 implementation and trying to complete 
at least one other bootstrap. 

Next September we shall automatically report our progress to anyone who 
orders the current release. Others who would like further information at that 
time should let us know. 

-Software Engineering Group 



23 January 1976 



Dear Mr. Richmond, 

We have just, finished implementation of our PASCAL-P compiler 
(configuration parameters: 65535, 1, 1, 1, 1, 3, 1, 8, 23), 
Please note that according to your instructions we need a 3 word 
setsize, but a scan of the compiler-generated-sets indicated that 
two 24 bit words would suffice (for our computer which has double 
word load and store hardware instructions, the efficiencies are 
significant) , 

Our implementation approach was to convert the Interpreter 
for P~code into SPOR (a structured FORTRAN) on the FOXl 2.4 bit 
computer (target machine) . We have just compiled the first test 
program using the P-compiler. Implementation required about 
6 programmer-months (July 1975 to January 1976) to complete so 
far. 

Our most time-consuming problems involved the character codes 
(both at the beginning and at the end) . Warn your user's that 
when the compiler assembly code wants to compare a character with 
the top of the stack, it uses the integer which represents- the 
ordinal position of the character in the character set of your CDC 
machine . This surprise was not found till a mouth ago late in 
the implementation. 

Overall we were very pleased with the service and materials 
that were provided. 

Mr. Robert J. Matherne 
Senior Research Engineer 
The Foxboro Company 
Poxboro, Massachusetts 02035 
(617) 543-8750 x2032 
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interpreter significantly (we were wrong; the speed 
Increase was only four per cent) . 

The following items made changing character sets 
difficult ( finding the items was our biggest problem; 
by enumerating them here, we hope to spare future 
implementers this search time). 

a. The compiler presumes a 64-character set, there 
is little reason to not make the limit a config- 
uration parameter (thus allowing for EBCDIC, as 
well as ASCII), Even more disturbing is the fact 
that the limit is bound in an executable statement 
'at line 1232 (line width = 80 characters), instead 
of being a constant definition. 

b. The scanner uses the arrays SSY and SOP declared 
to be indexed by for mapping special 
characters to symbols. This declaration not only 
assumes ORD (';') ^ ORD ('+'), but also assumes that 
all characters between and in the ETH set 
are between and in all other sets. We 
circumvented this difficulty by changing the 
declarations to index the arrays by the entire 

CHAR type (promptly causing an error due to point 
(a)). We feel that this is the most portable 
solution, costing little storage increase, and 
requiring only minor change to initialization code 
in procedure RATORS. 

The scanner presumes that the characters '0' to 
'9' and 'A' to 'Z' are contiguous and ordered, 
such that ORD ('2') < ORD ('0'). That is, of 
course, not true in all character sets. We feel 
that the most portable alternative would be to 
use the excellent facilities of PASCAL to define 
sets named LETTERS and DIGITS, using set member- 
*ship operations instead of relational comparisons 
in the scanner. This, of course, requires a 
PASCAL implementation where the maximum number of 
set elements is greater than or equal to the number 
of characters in the implementation's character set. 
CDC PASCAL notwithstanding, we think this is a good 
idea. 



2.. Configuration difficulties 



The SEL 8600 is a 32-bit word machine with byte, half- 
word and double-word addressing. Since this is not 
unlike an IBM 360, we followed the example in the kit 
order form, specifying INT5IZE = 4, BOOLSIZE = 1, 
CHARSIZE = 1, and SETSIZE = 8. The P-compiler, as well 
as the P-architecture, unfortunately, seems to be based 
on the assumption that characters occupy the same amount 
of space as integers. By far, the worst manifestation 
of this assumption (and the worst feature of the entire 
P-kit) is the use of LDCI <ORD (char)> by the compiler 
to indicate the load of a single character. We can see 
• no difficulty that would prevent LDC 'char' from being 
emitted instead. The lack of this small change required 
us to order a second configuration tape (kindly provided 
•by G. Richmond at no charge). This configuration was 
based on the use of half-words for integers, characters, 
and booleans- 

DAcrni n ^" ^oncl usion , we wish to -reiterate our overall satisfaction with 
PA5CAL-P. The above mentioned difficulties point to considerations for future- 
portable compiler efforts, and should not obscure the fact that we have a 
working compiler after a remarkably short amount of time. 

. n ongoing effort exists to support portable PASCAL, please let us 

Know, We have noted a number of additional minor problems not mentioned here 
that we will detail at your request. 

Sincerely, 

James Gilbert Michael Richmond 

JG/MR:dp 

cc: N. H. Nageli 
George Richmond 

University of Colorado 6? 



INFORMATION SCIENCE LABORATORIES 



FACULTY OF SCIENCE; UNIVERSITY OF TOKYO 
2-H-t6 YAYOI, BUNKYO-KU TOKYO, 113 JAPAN 



T. Hiklta. K. Ishlhata 
Department of Information Science 
Faculty of Science 
University of Tokyo 
Tokyo 113 Oapan 



February 21, 1976 



Mr. George Richmond 
Computing Center 
University of Colorado 
3645 Marine Street 
Boulder, Co, 80302 
U.S.A. 

Dear Mr. Richmond; 

This is a short notice on-our recent implementation of PASCAL based on a 
"trunk" compiler.^ Dr. H. H. Naegeli told us to send it to you for the 
PASCAL Newsletter*. (Please see an enclosed copy of his letter.) 

An extended version of Standard PASCAL named PASCAL 8000 was designed, 
and its compiler was implemented on a Japanese computer HITAC 8800/8700 
at the Computer Center of the University of Tokyo. This computer is a 
multi-processor system of 4 CPU with 4 megabytes main memory, and it has 
a quite similar machine .instruction set to. that of the IBM 360 and 370 
series computers. 

Our language extensions are concerned with constant definitions for 
structured types, variable initializations, new control structures named 
"foralV and "loop" statements, and "procedure skeletons" for procedure 
and function parameters proposed by Lecarme-Desjardins., 

The implementation was done by bootstrapping using the PASCAL-P interpretive 
compiler developed by U. Ammann. Our new compiler is based on H. H. 
Naegeli 's "trunk" compiler. This is a source program of a PASCAL compiler 
written itself in PASCAL, in which machine dependent parts (code generationp 
addressing, etc.) are marked and strictly separated from other machine 
independent parts, and detailed comments are provided which indicate the 
data or algorithms to be described to the final form by an actual 
implementor. The version we used was still at developmental stage, 
though almost completed, 

TO 



INFORMATION SCIENCE LABORATORIES 



FACULTY OF SCIENCE; UNIVERSITY OF TOKYO 
2-1 M 6 YAYOI, BUNKYO-KU TOKYO. 113 JAPAN 



About 1200 lines of the source program have been rewritten to the final 
form for our HITAC 8800/8700 out of total 5260 lines, and about 400 
lines have been newly added for our own language features. This amount 
of rewriting is considered to be fairly small compared with other works 
of bootstrapping appeared in the literatures^ and one of the values of 
the trunk compiler of course lies in this point. We felt difficulty 
during the rewriting process mainly in the expression evaluation scheme, 
For the other parts, the coding was rather simple and straightforward, 
though not trivial. 

For the details of the language definition of PASCAL 8000 and its 
implementation based on the trunk, the following two technical reports 
will be available from our department in March. 

T. Hikita, K. Ishihata, PASCAL 8000 Reference Manual. 

K. Ishihata, T. Hikita, Bootstrapping PASCAL Using a Trunk.- 



Sin cerely, 

Terua -Hikita 

Kiyoshi Ishihata 
71 



EIDGENOSSISCHE 
TECHNISCHE HOCHSCHULE ZORICH 
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2™ CENTRO OE CALCULO DE LA 

UNrVERSIDAD POLITECNICA 

rT73 DE BARCELONA. 76/03/02 
Ard*. Doctor Grcporio M«r«A6n, t/n. 
6AnCELONA-l4 Ttl. 933 29 49 



Institut fur Infonmalik 

Ciauslusstrasse 55 
CH-8006 Zurich 

^ 01 /32 6211 



March 5, 1976 



To those who have received Release 1 of our PASCAL 6000-3.4 system 



Mr. George H. Richmond 
University of Colorado 
Computing Center 
3645 Marine Street 
Boulder, Colorado 80302 
USA 



Dear A\>r, 



Richmond^ 



Our Computing Center is currently involved in a project lea- 
ding to the implementation of Concurrent Pascal Machine (Prof. 
Per Brinch Hansen - Caltech) on other real and virtual Machi- 
nes. Our main interest is in the field of concurrent processes 
and Operating Systems but since we use Pascal, we have problems 
the Pascal community has. 

We are using professor Steensgaard-Madsen version of Pascal on 
our Univac 1108. Pascal is used for educational purposes and 
also to write and test sequential algorithms for the Operating 
Systems written in Concurrent Pascal. 

Would you be so kind as to include us in your mailing list?. 
Thanking you in advance, I remain 



Sincerel y yours . 



7£. 




M.. Virg^s 
CTOK 



This is to inform you about the availability of Release 2. Its 
main characteristics are; 

- full compatibility with Release 1 , 

- all known bugs of Release 1 (update level 10) are corrected, 

- slightly improved compile speed, 

- reduced compile field length (small programs now compile with 
CM4600D), 

- execution in REDUCE mode is now possible, 

- no restriction on the number of externals, external references, 

and length of code per procedure, 

- print out of an error summary (i.e. a verbal explanation of 
the error numbers) in case of nonsuccessf ul compilation, 

- runtime test on invalid pointer values, 

- implementation of the standard procedure DISPOSE. 

'Based on Release 2, two extensions will in the near future be 
considered for implementation. This concerns: 

- dynamic array parameters 

- a variable initialization facility. 

The handling charge for Release 2 is Sfr. 100. — and includes the 
costs for the tape. 

If you are interested to receive Release 2, you are invited to fill 
out the enclosed order form. Please don*t pay in advance. You will 
be charged at delivery. 

We regret to be unable to continue the support of Release 1 . 

Sincerely yours, 

.\^^, ^ 

Pr, Ammann 



end. 
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ORGANISATION EUROPEENNE POUR LA RECHERCHE NUCLEAIRE 
CERN EUROPEAN ORGANIZATION FOR NUCLEAR RESEARCH 



SitGE: GEN^E/SUISSE 



CERN LABORATOIRE I 

Adresse postale/ Postal address,: 

1211 GENEVE 23 
SUISSE/SWITZERUND 



Voire reference 
Your reference 

Sreilltncr PS/CCI/RC/af cs 



Mr. George H. Richmond 
University of Colorado 
Computing Center 
3645 Marine Street 
Boulder, Colorado 80302 
U. S. A. 



Geneva, .12tli April 1976 



Dear Mr. Richmond, 

We are very much, interested in a Pascal compiler to he used for 
production programming on our control system. 

If you have a list of implementations, could you please send me 
tKe sublist for PDP-11 computers. Requirements for th.e compiler are the 
following : 

produce coda for a PDP-ll/45 or PDP-11/ 10 machine, Cl.e. for hoth. 
types of floating pointi), 

- run under DEC's RSX~H/-D real time operating system, 

- compile Itself on the PDF, 

the object code produced must be relocatable and fully compatible 
with, the TKB Qlnking editor) of RSX, 

- the sources of both compiler and run time library must be available 
Con DEC tape or Magtape) . 

For several months now I have been looking for such, a compiler, and 
I would.be glad even to find one that does not satisfy all the requirements, 
I looked at the following implementations ; 



Mr. Feiereisen (Karlsruhe, West Germany) ; it la one of the first 
P-code compilers and implements Pascal— 1, it r\ins under DOS— 11, 
compiles itself, but is not useful since it is not standard Pascal, 

Prof. P.B. Hansen's Solo System : ordered months ago, has not 
arrived yet, but uses the hardware of the PDP 11/45 and Its I & D 
space which is not supported by RSX. Since it is a stand— alone 
system, it will probably be difficult to lift it and put It in RSX. 

Mr. H, Nageli (ETH Zurich) has written a trunk (skeleton) compiler 
and fills up the code-generation parts. It looks like an efficient 
compiler, but at present has no real arithmetic and is designed aa 
a cross-compiler ; it is far too big to put on an 11. Implementation 



■Y4- 



under RSX would probably take 6 months^ to a year. 

A letter has been sent to Bron & De Vries CTEL Twente, Holland) , 
and I am awaiting their reply. 

In fact, it would be a nice thing once a year to spend an entire 
Pascal Newsletter on implementations. Such, a list would be welcome, and 
you are probably in the best position to prepare it. However, some 
details must be given with, each implementation, such, as : 

minimum hardware required Cmodel & peripheral) , 

- operating system under which, it runs, 

- core taken Cin bits or bytes) , 

whether it implements full standard Pascil or not, 
whether it compiles itself on its minimum configuration, 
where it can be obtained, at what cost, 
what the distribution medium Is. 

From the above, you will have noticed that a simple mentioning of 
"a PDP-11 implementation" is far too little! 

Looking forward to your reply and thanking you in advance. 

Yours sincerely. 




R. Callliau 
PS Division 
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VVSKUMNE V?P0CT0V£ STREDISKO 
PROGRAM OSN 



FFSri COMPUTING RESEARCH CENTRE 
LlOSf UNITED NATIONS D. P. 



Pul>r«Y»k4 e«.l«, BRATISLAVA, C»«e hotlov.lcl • 



Bratislava March 19^ 1976 



Mr^ George H. Richmond 
University of Colorado 
. Computing Center 
3645 Marine Street 
Boulder, Colorado 80302 



Dear Editor, 

Unfortunately I failed to respond to your call for existing 
Pascal /like/ compilers. Please accept my somewhat belated 
information: 

In December 1971 it was decided to implement a Pascal compiler 
at the Computer Research Centre in Bratislava Czechoslovakia, 
^'e have the CDC 3300 Computer* This compiler was to be used 
as systems programming tool and therefore we felt justified m 
makine some minor changes to Pascal. These modifications were 
conceived and implemented on the basis of what you call Pascal-0 
"version of language and compiler^ These modifications are the 
following: 

providing for separate compilation of procedures^ 
sharing of variables via ext-entry mechanism, 

- allocating static and dynamic memory for non-recursive or re- . 
cursive procedures 

- omitting the file concept r. ^ ^ 4. ♦ 

• slight modifications-unifications in the syntax of declarations 

- adding new statements, such as SELECT statement to cater for 
long IF-THEN-ELSE chains 

- introducing multi-level exists instead of gotos /this was 
higly fashionable then/. 

Theso changes, and the fact that the portability of the compi- 
ler was one of the main design goals, have led us to implement 
a completely new compiler, without using the ETH code. This 
compiler is a three-pass compiler with syntax and semantic part 
written in totally machine independent way, using intermediate 
. language. 

Now some basic facts about the implementation and the history 
of the use of the compiler: 

During the months of January and Rebruary 1972 a Pascal-to- 
-assembler /CDC 3300/ bootstrap compiler was written 
SNOBOL by one person* In. the following six months two people 



f. O. I**! 1101 
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/later three/ coded the compiler in the bootstrap Pascal. 
After September 1972 bootstrap, compiler was in extensive use 
by some fifty odd programmers in our centre. 

Until now they coded some 60 thousand lines of Pascal code for 
the following main applications; 

- a data base system 

- a compiler for input editing and correction of statistical 
. data 

- a compiler for table and report generation /also for statis- 
tics/ 

^ various editing and library systems used as a support for 
systems programming 

- a Translator Writing System. 

The above mentioned compilers generate the intermediate langua- 
ge directly fed to the Pascal code generator and use T^VS for 
syntax analysis. 

The Pascal compiler was since then twice expanded, improved, 
•'beautified" and subsequently bootstrapped. 

During the months of December 1973 and January 1974 I wrote 
a code generator in to 360-assembler. The 360 compiler was then 
successfully installed on the SIEMENS 150 computer /the same 
liardware-dif f erent OS/ in a period of one week; and in two days 
time it was installed on 370/145 computer. /This was in Februa- 
ry and March 1974/, One year later /December 1974 - January 
1975/ I modified the 370 compiler to produce directly the relo-» 
eatable code by writing in Pascal my own and nearly complete 
370 assembler, with the commands specified via the procedure 
calls, instead of the symbolic format. This I consider to be 
a rather elegant solution and my assembler was already used 
in an independent 360 compiler project. This modified 360/370/ 
/SIE2»IENS Pascal compiler was then installed in more computer 
installations at home and abroad. In the USA the compiler is 
installed since February 1975 at the Bureau of Labor Statistics, 
Washington DC. 

Needless to say that all 360/370/SIEMENS Pascal compilers run 
also as cross-compilers on our machine. 

Our SIEMENS implementation is used for teaching purposes at the 
University of Bratislava. There is also an almost complete im- 
plementation for Czechoslovak TESLA-200 computer /BULL-License/ 
at the Technical University of Prague. 

The compiler is also available on Commecon BJAD Computer 
Series. 

During the summer of 1975 some 20.000 lines of code which form 
part of the above mentioned systems were successfully transpor- 
ted to IBM-370* Finally, in January 1976, I extended our com-^ 
pilar so "that it might incorporate processes and Hoare-Hansen s 
monitoris as built-in language constructs. The entire change 
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was made in a period of a week; as a result we have got a 
concurrent version of the Pascal compiler /this is not the 
Hansen, s Concurrent Pascal, because it was not possible to 
integrate totally its constructs without making extensive 
modifications in the existing compiler/^ Nevertheless, we have 
obtained a consistent and proper extension of our compiler, 
such that the normal sequential programs are subset of the 
language accepted by our compiler. /Note that Hansen s Con- 
current Pascal is used only for parallel programs and that 
sequential programs and processes must be coded in the normal 
Pascal./ 

Since then I with another person have implemented a better part 
of an interactive terminal system /named Bratislava Terminal 
System - BTS/. This editor-compiler system consists of some 
3000 lines of Pascal code and contains 9 different monitors 
and 5 process classes. 

By this time the major part of the system is running and is 
being gradually used by our programmers. 

We did not experience any difficulties with implementation of 
BTS and are not aware of any serious programming errors either^ 
This I not mean as a boast but rather I want to stress the 
advantages of the combination of ^two very powerful tools: 
excellent language on one side and elegant monitors on the other 
side. This combination made the programming of BTS an exciting 
and rewarding experience the use. of the latest programming 
methodologies* 

Yours sincerely, 

P. J. Voda 



Dr, P. J. Voda 

Computing Research Centre 

Dubravska 3 

885 31 Bratislava 

Czechoslovakia 
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A PASCAL-Cross-Compiler for the PDPl'l-series (all models) written 
in PASCAL is now operational on the DEC System 10. With slight 
modifications it can be adapted to other PASCAL systems. 
The system is available on 9-track magnetic tape or on DEC-tape 
(two reels are necessary) and can be obtained— free of charge - 
by anyone who sends a tape (please do not send tape as parcel, 
but as letter) to 

C. Bron or J. Entrop 

Dept. of Electrical Engineering, . 

TW- building, 

Twente University of Technology, 
P.O. Box 217, 
Enschede , Netherlands. 

5 files will be loaded on tape 

- The Compiler's Source Code 

- A Documentation File 

- The text of the. runtime support in PAL-11. 

- The code of the runtime support in c6mpiler input format 

- An auxiliary program to transform output from the MACRO-11 
assembler into compiler input format. 

The latter two files are only relevant for those who wish to 
alter the existing runtime-package. 

The compiler generates absolute load-modules in "position 
independent code". The code makes no assumptions with regard 
to the Operating System in use and can - if wanted - be run 
on a bare PDPll. 

PASCAL has been fully implemented with the exception of files. 
The only files available are "input" and "output" for which 
the teletype can be used. Provisions for the programming of 
other, peripherals in PASCAL are present. 

1? . 



The following extensions to PASCAL have been implemented: 

- user defined procedures for interrupt handling 

- functions may deliver results of non-scalar type 

- procedures/functions as formal parameters 

- arrays can be passed as var-parameters without requirements 
on their size. 

- strings (of any length) can be passed as input parameters 
to procedures 

- access to elements of packed boolean arrays is allowed. 



EIDGENOSSISCHE 
TECHNISCHE HOCHSCHULE ZORICH 

Institut fur Informatik 

Clausiusstrasse 55 . jMjQjy IS 

CH- 8006 Zurich 
^ 01 /32 6211 

A new Release of the PASCAL-P system. 

This is to inform you about the availability of a new Release 
of our PASCAL-P system. 

Terminology used in the sequel: 

Pascal PI : either of the early Pascal P systems (released in 

March and July 1 973 respectively)... 
Pascal P2: the Pascal P system released in. May 74. 
Pascal P3; the new Pascal P system with the same hypothetical 

machine as the one underlying the Pascal P2 system. 
Pascal P4: the new Pascal P system with a slightly • modified 

hypothetical machine (allowing a more efficent 

implementation) • 



Pascal P3 

The compiler is improved in many details. It does, however, 
still generate code for the old P2 assembler interpreter. Th 
characteristics of the P3 system are: 

- 'Full' compatibility with the P2 system. 

- The two records of the assembly code produced by the 
compiler are terminated by the symbol 'O ' instead of two 
'end of line'. 

- All known bugs are corrected. 
-'Character set independence. 

- Runtime tests are included (indexing, assignement to 
subrange variables, and case selection are checked for 
legality.) 

- The standard functions 'succ' and 'pred' are implemented . 

- The usual default conventions 'readln = readln ( input) ' 
etc- hold. 



Pascal P4 

The compiler generates code for a modified assembler- 
interpreter. The characteristics of the P4 system are: 

- It contains all the improvements of the Pascal P3 system. 

- An enlarged set of instructions is used. All instructions 
now handle exactly one type. of expression (or have a type 
indicator) . This allows to eliminate book-keeping of type 
information at runtime and of tag fields in the stack. No 
implicit type conversion takes place any more. Instead, 
explicit type conversion instructions are generated by th 
compiler. 

- The cpmpiler respects possible alignment conditions for 
the allocation -of data, 

- A runtime, test on pointer val'ues is provided. 

- A test on runtime stack overflow is generated by the 
compiler at procedure entry, 



Explanations of the installation parameters 



intsize , real size , charsize ,bool size, sets ize ,ptr size : 

Number of addressable storage units to be reserved for 
variables of type integer, real, character, boolean set , 
pointer. As to 'setsize', remember that a set must be able 
to hold at least 48 elements if you intend to use the system 
to bootstrap the compiler. 

intal, real al , char al , boolal , setal ,ptral : 

Variables of the corresponding types will be given an 
address- which is a multiple of these alignment constants. 

stackelsize: Minimum size for a value on the expression stack. 
The expression stack is that portion of the stack which is 
used for the evaluation of expressions. 'Stackelsize' has to 
be equal to or a multiple of 'stackal'. * 

stackal: Alignment constant for a valu on the expression stack. 
'Stackal' must be a multiple of all other alignment 
constants and must be less or equal to 'stackelsize'. 

strglgth: Maximum length of a string, (in fact all strings will 
be of length 'strglgth'). A string must be able to hold the 
character representation of a number (real or integer) with 
its sign. The minimum length for a bootstrap is 12. 

intbits: Number of bits used for representing an integer without 
the sign. So the largest integer is 

intbits 
-2- - 1 

sethigh , setlow: Maximum and minimum ordinal values for the 
element of a set, 

ordmaxchar , ordminchar ; Maximum and minimum ordinal values of the 
character set. 



Depending on the alignment conditions there may be two 
possibilities for the assignment of store on top of the 
expression -stack . 

- Each stack element requires the same amount of store: In this 

case 'stackelsize' has to be greater than or equal to the 
maximum of the other size constants . (Remember : 'stackelsize 
is a multiple of 'stackal') 

- No waste of store: A new element on the expression stack has. 

to be placed at the next position allowed by the alignment 
constant 'stackal'. In this case 'stackelsize' has to be 
less than or equal to the maximum of the other size 
constants. 

The handling charges include the costs for generating the binary 
versions of the compiler, a minitape, and postage. 



with kind regards 
^2. Ch. Jacob! 



Order form for the revised Pascal P system; 

Please provide us with your revised Pascal P system according 
the specifications on next page. 

Address for delivery of the system 



The characteristics of our installation are 

Machine type 

Operating system 

Installation parameters (to be filled for case 'A' and 'b' 
below) 

intsize 
realsize 
char size 
boolsize 
ptr size 
setsize 
stackelsize 
strglgth 
intbits 
sethigh 
ordmaxchar 

.S3 



■ intal 
r ealal 
charal 
boolal 
ptral 
setal 
stackal 

setlow 
ordminchar * 



We order 

I Q - Pascal P4 compiler (in Pascal), 

- Pascal P4 compiler (in P4 code). 

- An assembler interpreter of P4 code (in Pascal, for 
documentation purposes, all alignement and size 
constants are set to 1 ) . 

- Pascal P compiler implementation notes with update 
list._ 

- Pascal P3 compiler (in. Pascal). 

With line num.bers, to indicate where it differs 
from PASCAL-P2. (All installation parameters set 
to a standard value.) 

Charge SFr 160.- 



II [J (For users who have access to a CDC 6000 Computer and 
want to experiment -with the compiler) 

- Pascal P4 compiler with some changes, so that it is 
accepted by the Pascal 6000 compiler (in Pascal). (All 
installation parameters set to a standard value.) 

- An assembler interpreter (in Pascal, as in package 
'A'). 

• - Pascal P compiler implementation notes with update, 
list. 
Charge SFr 80,- 



ill D ~ Update list to 'PASCAL~P compiler implementation notes'. 
Charge SFr 5.- 



Date : Signature : 



NB Order forms should be sent to the closest PASCAL-P distributor. 



PASCAL Distributors 



Mr. Christian Jacobi 

Eidgendssische Technische Hochschule Zurich 

Ins ti tut fur Informatik 

Glaus iuss trass e 55 

CH-8006 Zurich 

Switzerland 

(prices at left) 

Mr. George Richmond 
University- of Colorado _ 
Computing Center 
3645 Marine Street 
Boulder, Colorado 80309 
USA 

(write for prices) 
Mr. Carroll Morgan 

Basser Department of Computer Science 

University of Sydney 

Sydney, New South Wales 2006 

Aus tralia 

(write for prices) 
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PASCAL - USER MANUAL AND RFPORT 

^orrectlnn-? tn ^nd Edition 

*p - page» 1 « line, c « code (i.e, 



r - replace, 1 » insert) 



Q 

H 


1 


Q 


13 


-3 


r 


45 


-13 


r 


51 


16 


r 


56 


-6 


r 


63 


2 


r 


69' 


23 


r 


70 


7 


r 


77 


13 


r 


78 


-14 


r 


81 


2 


r 


84 


-15 


r 


86 


a 


1 



105 

1.05 
105 



117 
120 

121 



121 



12 
-1 



-18 



4 1 



8 i 



121 
124 



-a 

15 



124 -14 
127 27 



If' by "If" 

<unsigned constQnt>'* by *'<constan t>*' 
(output)" by "(output);" 

fi" by "f (i)r, "gd+D" by + "^i" by ( j ) 

1" by "n", "2" by "n-l"/**3" by "n-2% 
(n-1)" by "2", "n " by " 
stricly" by "strictly" 

^^J" . • .^^ ... 161 -17 

b egin inorder (pT ,llink ) ; " by " jDRaln inorder ( pT .llink ) ; 

, <fGrmal" by <formal" 
extent" by "extend" 
as ne" by "as one** 



133 
135 
135 
140 



3 
5 
30 
1 1 



161 -16 r 



by 105 
nly" by "only** 

dispose (p tt 1 ,tn ) can be used to indicate that storage occu- 

pied by the variable pT (with tag field 
values t1...tn) is no longer needed. 

(diagram expression) "^ " by "<-", "^ " by ">-", *V" by "<>" 

"neither be formal nor non local" by 

"not be declared on intermediate level" 

177 
178 
179 
180 
181 



assignment to function identifier not allowed here 
multidefined record variant 

X-opt of actual proc/func does no.t match formal declaration 
control variable must not be formal 
constant part of address out of range 



zero string not allowed 

integer part of real constant exceeds range 

too many exit labels 
by "15'* 
by "15" 
"by "4. A " 



205 
206 

260 

"14 

"14 

"18. A 

"two" by "to" 
"althought" by "although" 
"subtstitute" by "substitute" 
"structure type" by "structured type" 
whole line by 

"addition to the procedures ii£Li and ijiii • The textfiles these" 
whole line by v^.-< 
"standard praQedures apply to must not necessarily represent" 



87 



8 1 



The 'procedure read can also bq used to read from a file f which 
is not a textfile, 

read(f»x) 
in this case stands for 

b^rrln X :» fT ; get(f ) ^nd 

The procedure write can 
which- is not a textfile. 
write (f,x) 

in this case stands for ^ 
kacLin fT x; put(f ) ^ad 162 -15 i 



also be used to write onto a file f 

162 



£nd nf JLine by ^nd af J.ixie' 



98 


10 


r 


"debby" by "debby * ; *' 


102 


7 


r 


r" by "or" 


102 


20 


r 


"bufffer" by "buffer" 


103 


-6 


r 


"scaler" by "scalar" 


103 


-7 


r 


** char, and .alfa" by "and 



162 -6 i 



and char are listed 



The procedure read can also be used to read from a file f which 
is not a textfile. read(f,x) is in this case equivalent to 
X f T ; get (f ) . 

The procedure write can also be used to write onto a file f 
which is not a textfile. write (f,x) is in this case equivalent 
to fT x: put(f). 

^7 




UNIVERSITY OF MINNESOTA 



University Computer Center 

227 Experimental Engineering Building 

Minneapolis, Minnesota 55455 



TWIN CITIES 



(612) 376-7290 



March 18, 1976 



Dear Pascal User, 

As you^are probably aware there is .an enormous growth of interest in the 
new programming language Pascal as both a vehicle for teaching programming - 
concepts and for developing reliable software. In response to this interest 
a new Pascal User's Group is currently being formed. Members of the group will 
receive quarterly issues of the new expanded VaAcal Um^loJJLdA which will contain • 
a wide range of information both submitted by and of interest to the Pascal, user, 
teacher,,, maintainer, implementor, or just plain fan. (This Pascal User's Group . 
will be supplanting the informal Pascal Newsletter published previously by the 
University of Colorado and which some of you may have been receiving.) 

We would like to formally invite you and any member of your staff to join. 
Membership is $4.00 / Academic year and entitles you to 4 issues of the Newsletter. 
(The first issue will appear September, 1976.) Please fill out the enclosed 
coupon along with your check or money order made payable to "Pascal User's Group" 
and mail to the indicated address. Extra copies of the coupon are included to 
facilitate any future correspondence. 

We would also appreciate it if you would please forward' this letter and a 
coupon to any other persons who you feel may be interested in joining the User's 
Group. In particular, institutional memberships (e.g. libraries) are encouraged. 



Yours truly. 



• Andy Mickel , Editor 



G. Michael Schneider, Associate Editor 



John P. Strait, Associate Editor 



PASCAL USER'S GROLl? 
USER'S 



ALL PURPOSE COUPON 

'k'k-k-kicic-kic'k-k'h-kicic^-k'k-k 



GROUP 

(Clip, photocopy, or reproduce and mail to:. 

ViUcal U6(UiU GAoup I c/o Andy Mickel 

University Computer Center: 227 Exp Engr 
University of Minnesota 
Minneapolis, MN 55455) 

/ / Please enter me as a member of the Pa>6ca£ (J4eA'>6 G/Loap for the current Academic 
Year ending June 30, 1977. I understand that I shall receive all 4 issues of 
Vascat hi 2106 lQ.it Q/L for the year. Enclosed please find $4.00, 

/ / My new address is printed below. Please use it from now on. I'll enclose an 
old mailing label if I can find one. 

/ / Enclosed are some bugs I would like to report to the distributor of the 

' ' " . [ version of Pascal. Please forward it to the 

appropriate person so that something can be done about it. 

/ / Enclosed please fi-nd a contribution (such as what we are doing with Pascal 
at our computer installation), idea, article, or opinion which I wish to" 
. submit for publication in the next issue of the Hm^tzttoA. . 

I I None of the above. 



Other comments: From: 

name 
address 



phone 



PASCAL IMPLEMENTORS 



The following lists contain the names and addresses of people who 
are working on Pascal compilers for various machines. The first list 
is of recipients of the PASCAL-P2 system written in Zurich and dis- 
tributed from the University of Colorado. The date given is that of 
the roost recent contact with the person (s) given. In some cases, it 
is the shipment date. After the date is the configuration parameters, 
the target machine, and the implementation status when known. 



Hr. S. Kamal Abdali 
Rensselaer Polytechnic Institute 
Department of Mathematical Sciences 
Troy, New York 12181 

Mr. Eric W. Anderson 
12049 Greenwalk Drive 
St. Louis, Missouri 63141 

Mr. Mike Ball 
Code 2522 

Naval Undersea Center 

San Diego, California 92132 

Mr. Henry Bauer 

P. 0. Box 3682 

Computer Science Department 

University of Wyoming 

Laramie, Wyoming 82071 

Mr. Steven Bellovm 
University of North Carolina 
Department of Computer Science 
New West Hall 
^^Chapel Hill, North Carolina 27514 



7 November 1975 



31 May 1976 

131071, 4, 4, 1, 1, 8, 3, 11, 31 



21 May 1975 

65535, 1, 1, 1, 1, 2, 1, 12, 35 



1 May 1975 

131071, 1, 1, 1, 1, 2, 1, 11, 
Xerox Sigma 7 



31 



7 January 1976 

16777215, 4, 8, 1, 1, 8, 4, 16, 31 



Mr. David A. Be.nnett 15 December 1975 

Pattern An alysis-i- Recognition Corp. 65535, 2, 4, 1, 1, 8, 2, 8, 15 

228 W. Dominick Street, On the Mall 

Rome, New York 13440 



Mr. Lou Beverino 
Computer Center 
California State University 
Northridge, California 91324 

Mr. Stephen W. Borden 

Biology Data Center 

Inst, of Animal Resource Ecology 

University of British Columbia 

2075 Westbrook Place 

Vancouver, British Columbia 

Canada V6T 1W5 



8 May 1975 
CDC 3300 



7 May 1975 

16777215, 4, 8, 1, 1, 8, 3, 11, 31 
IBM 370/168 under MTS 



Mr. Kenneth L. Bowles 
UCSD Computer Center 
P. 0. Box 109 

La Jolla, California 92037 
Mr. C. E. Bridge 

E. I. du Pont de Nemours & Company- 
Engineering Physics Laboratory 
101 Beach Street. 
Wilmington, Delaware 19898 

Mr . Robert Bruce 
Harris Corporation 
Computer Systems Division 
1200 Gateway Drive 
Fort Lauderdale, Florida 33309 

Dr. John Earl Crider 
7201 Brompton Road, Apt. 114 
Houston, Texas 77025 

Mr. Edouard J. Desautels 
University of Wisconsin-Madison 
Computer Science Department 
1210 West Dayton Street 
Madison, Wisconsin 53706 

Mr. Edward E. Ferguson 
Texas Instruments, Inc. 
P. 0. Box 2237 
Huntsville, Alabama 35804 

Mr. Charles V. Gaylord 
Mr. Micheal Richmond 
Mr, James Gilbert 
Manager, Software Design 
Systems Engineering Laboratories 
1900 Quail Street 
Newport Beach, California 92660 

Dr. James E. George 
Mr. Robert T. Johnson 
Los Alamos Scientific Laboratory 
C10 - Mail Stop 268 
P. 0. Box 1663 

Los Alamos, New Mexico 87544 

Mr. A. J. Gerber 
University of Sydney 
Basser Dept. of Computer Science 
Sydn'ey, New South Wales, 2006 
Australia 

Mr. K. W. Giese 

Virginia Polytechnic Institute 
Computer Science Department 
560 McBryde Hall 
Blacksburg, Virginia 24061 
or 

Dr. Johannes J. Martin 
1001 Highland Circle SE 
Blacksburg, Virginia 24060 



22 August 1975 

131071, 1, 1, 1, 1, 2, 1, 16, 47 

Burroughs B6700, PDP-11 
Proceeding 

10 November 1975 

32767, 2, 4, 1, 1, 8, 2, 11, 15 



5 November 1975 

32767, 1, 2, 1, 1, 3, 1, 8, 23 



27 May 1975 



17 October 1975 

32768, 1, 2, 1, 1, 3, 1, 16, 23 



1 September 1975 



24 October 1975 

262143, 4, 4, 1, 1, 8, 4, 12, 31 
65535, 1, 2, 1, 1, 4, 1, 20, 15 
SEL 86-00 
Complete 



2 May 1975 



15 August 1975 

16777215, 25, 34, 8, 1, 72, 24, 16 
Burroughs B1726 

Proceeding, Expected December 1975 



28 April 1975 

16777215, 4, 8, 1, 1, 8, 3, 11, 31 
IBM 370/158 under ASP 



Mr. Jonathan R. Gross 
University of Minnesota 
Soc. Sci. Res. Facilities Center 
25 Blegen Hall 

Minneapolis, Minnesota 55455 

Dr. GiJUbert Hansen 

Dept. of Coraputer+Info . Sciences 

512 Weil Hall 

University of Florida 

Gainesville, Florida 32611 



Mr. Robert Hartmann . 
2551 Jacaranda Street 
Santa Ana, California 92701 



6 March 1975 
DEC PDP 8/E 



22 April 1975 

3145728, 4, 8, 1, 1, 8, 3, 11, 31 
IBM 370/165 under OS/MVT 
22 April 1975 

65536, 1, 2, 1, 1, 4, 1, 8, 15 

TI 980A 

Complete, Available for distribution 
3 March 1976 

16777215, 4, 8, 1, 1, 8, 4, 16, 32 



Mr. Andrews W. Hastings 31 May 1976 

Information Processing Systems 9297 327679, 4, 8, 1, 1, 8,* 3, 11, 33 
Raytheon 

Electromagnetic Systems Division 
93 Castilian 

Goleta, California 93017 



Prof. T. S. Heines 
Computer and Information Science 
Cleveland State University 
Cleveland, Ohio 44115 

Mr. Earnest E. Hughes 
Systems Programmer 
CKI. Corporation 
11000 Cedar Avenue 
Cleveland, Ohio 44106 

Dr. Fred M. Ives 

Dept. of Math, and Computer Sci. 
Western Washington State College ' 
Bellingham, Washington 98225 

Mr. George D. Jelatis 
University of Minnesota 
Dept. of Lab. Med icine+Pathology 
Div. of Health Computer Sciences 
Medical School 

P. 0. Box 511, Mayo Memorial Bldg. 
Minneapolis, Minnesota 55455 

Mr. Larry J. Jensen 
Datapoint Corporation 
9725 Datapoint Drive 
San Antonio, Texas 78284 

Mr. Peter Kornerup 
Computer Science Department 
Univ. of Southwestern Louisiana 
USL Station Box 4-4330 
Lafayette, Louisiana 70504 



21 May 1975 

65535, Ir 2, 1, 1, 4, 1, 8, 15 
TI 980A 



31 March 1976 

65535, 1, 1, 1, 1, 2, 1, 12, 35 



22 July 1975 

16777215, 4, 8, 1, 1, 8, 3, 11/ 31 
IBM 370-, Interdata 70 



15 May 1975 
CDC 3300 



5 November 1975 

65535, 2, 4, 1, 1, 8, 2, 8, 15 



3 March 1976 

16777215, 1, If 1, Ir 2, 1, 12, 35 



9^ 



Dr. Robert M. Lansford 
Burroughs Corporation 
3620 Greenhill Road 
Pasadena, California 91107 
or 

Mr. William C. Price 
Burroughs Corporation 
460 Sierra Madre Villa Ave. 
Pasadena, California 91109 

Prof. Kyu Y. Lee 
University of Montana 
Department of Computer Science 
Missoula, Montana 59801 



10 February 1975 
Burroughs B4700, B6700 



31 March 1975 

58367, 1, 1, 1, 1, 2, 1, 12, 35 



Prof. Daniel W. Lewis 
Dept. of EE and Comp. Sci. 
The University of Santa Clara 
Santa Clara, California 95053 



31 May 1976 

65535, 1, 2, 1, 1, 4, 1, 6, 16 



Mr. Hugh MacKenzie 
CSIRO 

P. 0. Box 1800 
Canberra City, A. C, T. 
Australia 2601 



18 December 1974 



Mr. Robert Matherne 
Senior Research Engineer 
Research Department 
Foxboro Corporation 
Foxboro, Massachusetts 02035 

Mr. Ronald L. McDaniels 
Varian Data Machines 
2722 Michelson Drive 
Irvine, California 92664 



23 January 1976 

65535, 1, 1, 1, 1, 3, 1, 8, 23 

FOX 1 



21 February 1975 

32767, 1, 2, 1, 1, 4, 1, 6, 15 

32767, 1, 1, 1, 1, 4, 1, 16, 15 



Mr. Carlton Mills, Soft. 
Mills International 
203 North Gregory 
Urbana, Illinois 61801 



Eng, 10 February 1975 

1048575, 1, 1, 1, 1, 2, 1, 17, 39 
Burroughs B6700, Modcomp 



Mr. Richard O'Brien 

Texas Instruments, Inc. 

13510 North Central Expressway 

North Building 

Dallas, Texas 75232 



9 October 1975 

16777215, 4, 8, i, 1, 8, 3, 16, 31 



Mr. Stephen A. Pitts 
305 East Jarman Drive 
Midwest City, Oklahoma 73110 

Mr. Fred Powell, Director 
Computer Center 
Mary Baldwin College 
Staunton, Virginia 24401 

Prof. Bruce A. Pumplin 
University of Wisconsion 
Department of Computer Science 
Garfield and Park Avenue 
Eau Claire, Wisconsin 54701 



15 May 1975 



21 May 1975 

16383, 1, 2, 1, 1, 4, 1, 8, 15 
IBM 1130 



5 November 1975 

32767, 1, 1, 1, 1, 2, 1, 13, 39 

Burroughs B5700 

Complete 

?3 



Mr. James D. Rogan 

Comshare, Inc. 

VKolverine Tower 

P. 0. Box 1588 

Ann Arbor, Michigan 4 8106 

Mr, Richard L. Roth 

1052 Clark Avenue 

Mountain View, California 94040* 

Mr. David Rowland, Manager 
Electro Scientific Industries, Inc. 
13900 N. W. Science Park Drive 
Portland, Oregon 97229 

Mr. Mark D. Rust ad 
Moorhead State University 
Computer Center 
1104 7th Avenue South 
Moorhead, Minnesota 56560 

Prof. A. H. J. Sale 

Department of Information Science 

University of Tasmania 

G. P. 0. Box 252C 

HoDart 7001, Tasmania 

Mr. James P. Shores 
344 Glenwood Avenue 
New London, Connecticut 06320 

Mr. Thomas C. Socolofsky 
221 Agriculture Hall 
Michigan State University 
East Lansing, Michigan 4 8823 

Mr. Henry Spencer 
' P. 0. Box 302 
Sub Post Office 6 
Saskatoon, Saskatchewan 
Canada S7N 0W0 

Mr, Gordon Stuart 
Camosun College 

Technical and Vocational Institute 

1950 Lansdowne Road 

Victoria, B. C, Canada V8P 5J2 

Mr, Robert A, Stryk 
Honeywell, Inc. 

Mathematical Sciences Department 
Corporate Research Center 
10701 Lyndale Avenue South 
Blooming ton, Minnesota 55420 

Dr. Andrew S. Tanenbaum 
Wiskundig Seminarium 
Der Vrije Universiteit 
Amsterdam - 1001 Postbus 7161 
De Boelelaan 1081 
Netherlands 



13 May 1975 

131071, 1, 1, 1, 1, 2, 1, 11, 31 
Xerox Sigma 9 



21 April 1976 

65535, 2, 4, 1, 2, 8, 2, 11, 15 
Microdata 800 

17 November 1976 

65536, 2, 4, 1, 1, 8, 2, 16, 15 
DEC PDP 11/05 

Proceeding, Expected Summer 1976 
31 May 1976 

UNIVAC 90/30, Motorola 6800 



18 August 1975 

196607, 1, 1, 1, 1, 2, 1, 11, 39 
Burroughs B6700 

Proceeding, Expected Deceniber 1975 



21 May 1975 

262143, 1, 1, 1, 1, 2, 1, 12, 35 

Univac 1108 

22 July 1975 



13 February 1975 

65535, 2, 8, 1, 1, 8, 2, 8, 15 

DEC PDP 11 



3 March 1976 

65535, 2, 4, 1, 1, 8, 2, 8, 15 
PDP 11/40 



18 December 1975 

71000, If 1, 1, If 2, 1, 12, 20 



7 February 1975 

65535, 2, 4, 1, 1, 8, 2, 6, 15 
DEC PDP 11/45 



Mr. Michael Teener 31 May 1976 

Technology Service Corporation 

2811 Wilshire Blvd. 

Santa Monica/ California 90403 

Mr. Greg B. Thagard .31 March 1976 

60 Linda Isle 

Newport Beach, California 92660 



Mr. Alfred I, Towell 
Wrubel Computer Center/Hper 
Indiana University 
Bloomington, Indiana 47401 



17 October 1975 



Mr, Robert D. Vavra 7 February 1975 

Sperry Univac Computer Systems 
2276 Highcrest Drive 
Roseville, Minnsota 55165 



Prof. Jean G, Vaucher 15 December 1975 

Departement d ' inf ormatigue 
Universite de Montreal 
Case postale 6128 
Montreal 101, Canada 



Mr. Scott K, Warren 
warren, rowe & associates 
2715 Bissonnet, suite 212 
Houston, Texas 77005 



25 July 1975 

.549755813887, 1, 1, 1, 1, 2, 1, 16, 39 



Mr. Masaru Watanabe 

Institute of Industrial • Science 

University of Tokyo 

22-1, Roppongi 7 Chrome, Minato-Ku 

Tokyo 106, Japan 



13 February 1975 

16777215, 4, 8, 1, 1, 8, 3, 11, 31 
FACOM 230/55 



Mr,. Ben Watson 

Texas Instruments, Austin 

Mail Station 2091 

P. 0. Box 2909 

Austin, Texas 78767 



18 March 1976 

65535, 2, 4, 1, 1, 8, 2, 8, 15 



Mr. Waldo M. Wedel 18 December 1974 

University of Texas 
Computation Center 
Austin, Texas 78712 



Prof. David B. Wortman 
Computer Systems Research Group 
University of Toronto 
Toronto, Ontario 
Canada M5S 1A4 

Mr. Walter Wuensch 
Mobydata, Inc, 
P. 0. Box 462 
Ontario, New York 14519 



14 March 1975 

16777215, 4, 8, 1, 1, 32, 4, 32, 31 
16777215, 8, 8, 8, 8, 8, 8, 8, 31 
IBM 370 



27 January 1975 

^SS35, 2, 4, 1, 1, 4, 1, 11, 31 
Data General 840 



Mr. John S. Yates 23 June 1975 

Computer Identics Corp. 65535, 2, 4, 1, 1, 8, 2, 8, 15 

31 Dartmouth Street 
Westwood, Massachusetts 02090 



Mr. Kenneth Young 

3311 West 3rd Street, Apt. 1-319 

Los Angeles, California 90020 

California State Univ. of Chico 

Computer Center 

Chico, California 95926 

Stanford University 

Stanford Linear Accelerator Center 

2575 Sand Hill Road 

henlo Park, California 94025 



19 December 1975 

524287, 4, 8, 1, 1, 8, 3, 11, 31 
IBM 370/145 under VM/CMS 

22 December 1975 

32768, 1, 2, 1, 1, 3, 1, 8, 23 



21 May 1975 



The second list is of other Pascal implementation efforts. Following 
the date of last contact with the implemen tor { s) is the implementation 
route, the target machine, and the current status when known. 



Mr. Laszlo Almasi & Mr. Jeno Lehel 
Computing and Automation Institute 
Hungarian Academy of Sciences 
H-1014 Budapest, Uri u. 49 
Hungary 

Prof. Tore Amble 
Division of Informatics 
University of Trondheim 
N-7034 Trondheim - NTH 
Norway 

Dr. C. Bron 

Dept. of Electrical Engineering 
Technical University of Twente 
P. 0. Box 217, Enschede 
Netherlands 



12 December 1975 
PASCAL-P2 
CDC 3300 
Proceeding 



24 April 1974 
PASCAL-PI 
Univac 1108 

Complete, Available for distribution 



8 August 1975 
PASCAL-PI 
PDP 11 

Proceeding, Expected December 1975 



Mr. Pierre Desjardins 
Departement D'informatique 
Universite de Montreal 
Case Postale 6128 
Montreal 101, Quebec 
Canada 



1 November 1974 
Xerox Sigma 6 



Monsieur Marcel Dupras 
Institut de Programmation 
Tour 55-65 

11 Quai Saint Bernard 

F-75 Paris 

France 



1 December 1974 
PASCAL-PI 

CDC 3600, CXI 10070. 
Complete 



Mr. Lucien Feiereisen 30 June 1975 

Inst. f. Biokyber. u. Biomed . Techk. JANUS 

Universitaet Karlsruhe PDP-11/45 under DOS/BATCH 

D-7500 Karlsruhe 1 Complete 
Kaiserstrasse 12 
Germany 



Dr. Charles N. Fischer 
University of Wisconsin 
MACC: 1210 W. Dayton Street 
Madison, Wisconsin 53706 

Dr. W. Bruce Foulkes 
PASCAL Distribution Manager 
Department of Computer Science 
University of Manitoba 
Winnipeg, Manitoba 
Canada R3T 2N2 

Prof. Dr. G. Goos 

Institut Fuer Informatik II 

75 Karlsruhe 1 

Zirkel 2 

Germany 

Prof. Per Brinch Hansen 
Information Science 286-80 
California Institute of Technology 
Pasadena, California 91125 

Mr . Al .Har tmann 
Mail Code 286-80 

California Institute of Technology 
Pasadena, California 91109 

Monsieur Gerard Henneron 
IREP 

Department Informatique 
Boite Postale 47 
38040 Grenoble CEDEX 
France 

Mr. Teruo Hikita 

Mr. Kiyoshi Ishihata 

Mr. Michiaki Yasumura 

Information Sciences Laboratories 

University of Tokyo 

Faculty of Science 

Bunkyo-ku 

Tokyo 113 

Japan 

Mr. M. Iglewski 

Computation Centre 

Polish Academy of Sciences 

P. 0. Box 22 

00-901 Warsaw PKiN 

Poland 

Prof. Richard B. Kieburtz 
PASCAL Compiler Project 
Department of Computer Science 
SUNY at Stony Brook 
Stony Brook, New York 11794 



30 December 1975 
Univac 1110 

Proceeding, Expected Fall 1976 



16 April 1974 

New compiler written in PL360 
IBM 370 

Proceeding, Available for distribution 



1 November 1974 
PASCAL-PI 
Burroughs B6700 
Complete 



19 January 1976 
DEC PDP 11/45 

Complete, Available for distribution 



29 April 1974 
PASCAL-PI 
IBM 370 

Complete, Distribution terminated 

1 December 1974 
PASCALl Bootstrap 
IBM 360 under OS/MVT 
Complete 



21 February 1975 
PASCAL-P2 
Hitac 8800/8700 
Complete 



30 December 1975 
PASCAL-P2 
IBM 370/145 
Proceeding 



15 March 1976 
New compiler 
IBM 360 and 370 

Complete, Available for distribution 
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Dr. John Larmouth (Pascal) 
Univ. of Cambridge Comp. Lab. 
Corn Excnange Street 
Camoridge CB2 3QG 
England 

Mr. R. Moll 

Leibniz-Rechenzentrum der BAW 
Barerstrasse 21 
D-800ia Muenchen 2 
Germany 

Prof. Dr. H.-H. Nagel 
Institut Fuer Tnformatik 
Universitaet Hamburg 
Schlueterstr asse 70 
D-2000 Hamburg 13 
Germany 
or 

Mr. Waldo M. Wedel 
University of Texas 
Computation Center 
Austin, Texas 78712 

Pascal Group 

267 Digital Computing Laboratory 
University of Illinois 
Urbana, Illinois 61801 

Dr. S. V. Rangaswamy 
School of Automation 
Indian Institute of Science 
Bangalore 560 012 
Ind ia 



1 November 1974 
Interpreter 
IBM 370 

Complete, Available for distribution 



4 December 1974 
Telefunken TR440 
Complete 



1 July 1975 
PASCAL-PI 
nsc System 10 

Complete, Available for distribution. 



29 August 1974 
PASCALl Bootstrap 
DEC PDP 11/20 
Complete 

24 October 1974 

PASCAL-PI 

IBM 360/44 



Mr. David L. Russell 
Digital Systems Laboratory 
Stanford University 
^Stanford, California 94305 

Software Engineering Group 
University of Colorado 
Department of EE 
Boulder, Colorado 80302 



3 September 1974 
PASCAL0 Bootstrap 
IBM 370 ' 

Complete, Distribution terminated 

1 September 1975 
Intermediate language - Janus 

Portable 

Preliminary version available 
Next release - 1 February 1976 



Mr. Rod Steele 
Tektronix, Inc. 
P. 0. Box 500 
Beaverton, Oregon 97002 

Dr. Jorgen Steensgaard-Madsen 
Datalogisk Institut 
University of Copenhagen 
Sigurdsgade 41 
DK-2200 Copenhagen N 
Denmark 



11 December 1975 
Burroughs B3700 
Complete 



25 July 1974 

PASdAL-Pl Bootstrap 

Univac 1100 under EXEC 8 

Complete, Available for distribution 



Mr. H. C. de Ruyter van Steven inck 
Philips Research Laboratories 
•Eindhoven 

Netherlands " - 



1 November 1974 
PASCAL-PI 
Philips P1400 
Complete 



Mr. Masato Takeichi 

Dept. of Mathematical Engr. 

Faculty of Engineering 

University of Tokyo 

Bunkyb-ku 

Tokyo 113 

J a pan 



Monsieur Didier Thibault 
17 Rue Gay-Lussac 
75005 Paris 
France 

Monsieur Alain Tisserant 
Ecole des Mines 
Departement Informatique 
Pare de Saurupt 
54042 NANCY CEDEX 
France . 



1 September 1974 
PASCAL-PI Interpreter 

MELCOM 7700, Xerox Sigma 7 (monitor BPM) 

Complete 

1 March 1975 

PASCAL-PI Interpreter 

FACOM 230-38 (0S2/VS) 

Complete 

1 August 1975 

Rewrite of CII IRIS 80 PASCALl Compiler 
MELCOM 7700, Xerox Sigma 7 (monitor BPM) 
Complete 

2 May 1974 
PASCALl Bootstrap 

CII IRIS 80, CII 10070, Xerox Sigma 7 
Complete, Available for distribution 

4 July 1975 
PASCAL-P2 

Telemecanigue T1600, Solar minicomputer 
Proceeding 



Dr. p. J. voda 

Computing Research Centre 

Dubravska 3 

885 31 Bratislava 

Czechoslovakia 

Dr. Jim Welsh 

Department of Computer Science 
Queen's University 
Belfast BT7 INN 
North Ireland 



19 March 1976 
PASCAL0 Bootstrap 

CDC 3300, IBM 360, SIEMENS 150, Commecon 

Complete 

29 July 1974 
PASCAL0 Bootstrap 
ICL 1900 

Complete, Available for distribution 
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